home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1991-05-29 | 37.0 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1f f4 20 3e 20 | 3c 42 42 43 54 61 70 65 |..... > |<BBCTape|
|00000010| 24 44 69 72 3e 2e 21 52 | 75 6e 49 6d 61 67 65 0d |$Dir>.!R|unImage.|
|00000020| 00 14 04 0d 00 1e 09 ee | 20 85 20 e0 0d 00 28 04 |........| . ...(.|
|00000030| 0d 00 32 19 61 70 70 5f | 6e 61 6d 65 24 20 3d 20 |..2.app_|name$ = |
|00000040| 22 42 42 43 54 61 70 65 | 22 0d 00 3c 04 0d 00 46 |"BBCTape|"..<...F|
|00000050| 1d de 20 74 61 73 6b 25 | 20 34 3a 24 74 61 73 6b |.. task%| 4:$task|
|00000060| 25 20 3d 20 22 54 41 53 | 4b 22 0d 00 50 3d c8 99 |% = "TAS|K"..P=..|
|00000070| 20 22 57 69 6d 70 5f 49 | 6e 69 74 69 61 6c 69 73 | "Wimp_I|nitialis|
|00000080| 65 22 2c 32 30 30 2c 21 | 74 61 73 6b 25 2c 61 70 |e",200,!|task%,ap|
|00000090| 70 5f 6e 61 6d 65 24 20 | b8 20 2c 74 61 73 6b 5f |p_name$ |. ,task_|
|000000a0| 68 61 6e 64 6c 65 25 0d | 00 5a 04 0d 00 64 11 ee |handle%.|.Z...d..|
|000000b0| 20 85 20 f2 65 72 72 6f | 72 28 b9 29 0d 00 6e 04 | . .erro|r(.)..n.|
|000000c0| 0d 00 78 0e f2 77 69 6d | 70 5f 69 6e 69 74 0d 00 |..x..wim|p_init..|
|000000d0| 82 0e f2 70 72 6f 67 5f | 69 6e 69 74 0d 00 8c 04 |...prog_|init....|
|000000e0| 0d 00 96 11 ee 20 85 20 | f2 65 72 72 6f 72 28 a3 |..... . |.error(.|
|000000f0| 29 0d 00 a0 04 0d 00 aa | 38 f4 20 4d 69 6e 69 6d |).......|8. Minim|
|00000100| 69 73 65 20 6d 65 6d 6f | 72 79 20 63 6f 6e 73 75 |ise memo|ry consu|
|00000110| 6d 70 74 69 6f 6e 20 28 | 63 75 72 72 65 6e 74 20 |mption (|current |
|00000120| 65 6e 64 20 2b 20 31 20 | 70 61 67 65 29 0d 00 b4 |end + 1 |page)...|
|00000130| 12 e0 20 3d 20 e0 20 2b | 20 38 2a 31 30 32 34 0d |.. = . +| 8*1024.|
|00000140| 00 be 04 0d 00 c8 2a c8 | 99 20 22 4f 53 5f 52 65 |......*.|. "OS_Re|
|00000150| 61 64 4d 6f 6e 6f 74 6f | 6e 69 63 54 69 6d 65 22 |adMonoto|nicTime"|
|00000160| 20 b8 20 69 64 6c 65 5f | 74 69 6d 65 25 0d 00 d2 | . idle_|time%...|
|00000170| 1c 69 64 6c 65 5f 74 69 | 6d 65 25 20 2b 3d 20 70 |.idle_ti|me% += p|
|00000180| 6f 6c 6c 5f 74 69 6d 65 | 25 0d 00 dc 04 0d 00 e6 |oll_time|%.......|
|00000190| 05 f5 0d 00 f0 42 20 20 | c8 99 20 22 57 69 6d 70 |.....B |.. "Wimp|
|000001a0| 5f 50 6f 6c 6c 49 64 6c | 65 22 2c 70 6f 6c 6c 5f |_PollIdl|e",poll_|
|000001b0| 6d 61 73 6b 25 2c 77 69 | 6d 70 5f 62 6c 6f 63 6b |mask%,wi|mp_block|
|000001c0| 25 2c 69 64 6c 65 5f 74 | 69 6d 65 25 20 b8 20 63 |%,idle_t|ime% . c|
|000001d0| 6f 64 65 25 0d 00 fa 10 | 20 20 c8 8e 20 63 6f 64 |ode%....| .. cod|
|000001e0| 65 25 20 ca 0d 01 04 3b | 20 20 20 20 c9 20 30 20 |e% ....;| . 0 |
|000001f0| 20 20 20 20 3a e7 20 70 | 75 74 74 69 6e 67 25 20 | :. p|utting% |
|00000200| 8c 20 f2 6e 75 6c 6c 5f | 70 75 74 74 69 6e 67 20 |. .null_|putting |
|00000210| 8b 20 f2 6e 75 6c 6c 5f | 67 65 74 74 69 6e 67 0d |. .null_|getting.|
|00000220| 01 0e 3a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..: | |
|00000230| 20 20 20 c8 99 20 22 4f | 53 5f 52 65 61 64 4d 6f | .. "O|S_ReadMo|
|00000240| 6e 6f 74 6f 6e 69 63 54 | 69 6d 65 22 20 b8 20 69 |notonicT|ime" . i|
|00000250| 64 6c 65 5f 74 69 6d 65 | 25 0d 01 18 2c 20 20 20 |dle_time|%..., |
|00000260| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 69 64 6c | | idl|
|00000270| 65 5f 74 69 6d 65 25 20 | 2b 3d 20 70 6f 6c 6c 5f |e_time% |+= poll_|
|00000280| 74 69 6d 65 25 0d 01 22 | 32 20 20 20 20 c9 20 32 |time%.."|2 . 2|
|00000290| 20 20 20 20 20 3a c8 99 | 20 22 57 69 6d 70 5f 4f | :..| "Wimp_O|
|000002a0| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 77 69 6d 70 |penWindo|w",,wimp|
|000002b0| 5f 62 6c 6f 63 6b 25 0d | 01 2c 33 20 20 20 20 c9 |_block%.|.,3 .|
|000002c0| 20 33 20 20 20 20 20 3a | c8 99 20 22 57 69 6d 70 | 3 :|.. "Wimp|
|000002d0| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 77 |_CloseWi|ndow",,w|
|000002e0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 0d 01 36 1d 20 20 |imp_bloc|k%..6. |
|000002f0| 20 20 c9 20 36 20 20 20 | 20 20 3a f2 6d 6f 75 73 | . 6 | :.mous|
|00000300| 65 5f 63 6c 69 63 6b 0d | 01 40 1f 20 20 20 20 c9 |e_click.|.@. .|
|00000310| 20 37 20 20 20 20 20 3a | f2 75 73 65 72 5f 64 72 | 7 :|.user_dr|
|00000320| 61 67 5f 62 6f 78 0d 01 | 4a 34 20 20 20 20 c9 20 |ag_box..|J4 . |
|00000330| 38 20 20 20 20 20 3a c8 | 99 20 22 57 69 6d 70 5f |8 :.|. "Wimp_|
|00000340| 50 72 6f 63 65 73 73 4b | 65 79 22 2c 77 69 6d 70 |ProcessK|ey",wimp|
|00000350| 5f 62 6c 6f 63 6b 25 21 | 32 34 0d 01 54 20 20 20 |_block%!|24..T |
|00000360| 20 20 c9 20 39 20 20 20 | 20 20 3a f2 6d 65 6e 75 | . 9 | :.menu|
|00000370| 5f 73 65 6c 65 63 74 69 | 6f 6e 0d 01 5e 1e 20 20 |_selecti|on..^. |
|00000380| 20 20 c9 20 31 37 2c 31 | 38 20 3a f2 75 73 65 72 | . 17,1|8 :.user|
|00000390| 5f 6d 65 73 73 61 67 65 | 0d 01 68 25 20 20 20 20 |_message|..h% |
|000003a0| c9 20 31 39 20 20 20 20 | 3a e7 20 77 69 6d 70 5f |. 19 |:. wimp_|
|000003b0| 62 6c 6f 63 6b 25 21 31 | 36 3d 33 20 8c 0d 01 72 |block%!1|6=3 ...r|
|000003c0| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0 | |
|000003d0| 20 20 20 c8 99 20 22 4f | 53 5f 46 69 6c 65 22 2c | .. "O|S_File",|
|000003e0| 36 2c 73 61 76 65 64 5f | 66 69 6c 65 24 0d 01 7c |6,saved_|file$..||
|000003f0| 45 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |E | |
|00000400| 20 20 20 f2 6d 65 73 73 | 61 67 65 28 22 44 61 74 | .mess|age("Dat|
|00000410| 61 20 74 72 61 6e 73 66 | 65 72 20 66 61 69 6c 65 |a transf|er faile|
|00000420| 64 3a 20 52 65 63 65 69 | 76 65 72 20 64 69 65 64 |d: Recei|ver died|
|00000430| 22 29 0d 01 86 15 20 20 | 20 20 20 20 20 20 20 20 |").... | |
|00000440| 20 20 20 20 20 20 cd 0d | 01 90 07 20 20 cb 0d 01 | ..|... ...|
|00000450| 9a 13 fd 20 70 69 67 73 | 5f 63 61 6e 5f 66 6c 79 |... pigs|_can_fly|
|00000460| 25 0d 01 a4 04 0d 01 ae | 0c f2 65 78 69 74 28 b9 |%.......|..exit(.|
|00000470| 29 0d 01 b8 04 0d 01 c2 | 05 e0 0d 01 cc 04 0d 01 |).......|........|
|00000480| d6 4c 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.L------|--------|
|00000490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 01 e0 04 0d 01 |--------|--......|
|000004d0| ea 12 dd 20 f2 65 78 69 | 74 28 6d 75 73 74 25 29 |... .exi|t(must%)|
|000004e0| 0d 01 f4 04 0d 01 fe 3c | f4 20 49 66 20 6d 75 73 |.......<|. If mus|
|000004f0| 74 25 20 69 73 20 54 52 | 55 45 20 77 65 20 6d 75 |t% is TR|UE we mu|
|00000500| 73 74 20 65 78 69 74 2c | 20 65 76 65 6e 20 77 69 |st exit,| even wi|
|00000510| 74 68 20 75 6e 73 61 76 | 65 64 20 66 69 6c 65 73 |th unsav|ed files|
|00000520| 0d 02 08 04 0d 02 12 32 | e7 20 68 6f 75 72 67 6c |.......2|. hourgl|
|00000530| 61 73 73 25 20 c8 99 20 | 22 48 6f 75 72 67 6c 61 |ass% .. |"Hourgla|
|00000540| 73 73 5f 4f 66 66 22 3a | 68 6f 75 72 67 6c 61 73 |ss_Off":|hourglas|
|00000550| 73 25 20 3d 20 a3 0d 02 | 1c 04 0d 02 26 58 e7 20 |s% = ...|....&X. |
|00000560| 6d 6f 64 69 66 69 65 64 | 25 20 80 20 ac 20 6d 75 |modified|% . . mu|
|00000570| 73 74 25 20 e7 20 ac 20 | a4 63 6f 6e 66 69 72 6d |st% . . |.confirm|
|00000580| 28 22 55 6e 73 61 76 65 | 64 20 64 61 74 61 3a 20 |("Unsave|d data: |
|00000590| 61 72 65 20 79 6f 75 20 | 73 75 72 65 20 79 6f 75 |are you |sure you|
|000005a0| 20 77 61 6e 74 20 74 6f | 20 51 75 69 74 3f 22 29 | want to| Quit?")|
|000005b0| 20 e1 0d 02 30 04 0d 02 | 3a 21 f4 20 43 6c 65 61 | ...0...|:!. Clea|
|000005c0| 72 20 6f 75 74 20 74 68 | 65 20 52 53 34 32 33 20 |r out th|e RS423 |
|000005d0| 62 75 66 66 65 72 73 0d | 02 44 09 2a 46 58 20 32 |buffers.|.D.*FX 2|
|000005e0| 0d 02 4e 0c 2a 46 58 20 | 32 31 20 31 0d 02 58 0c |..N.*FX |21 1..X.|
|000005f0| 2a 46 58 20 32 31 20 32 | 0d 02 62 04 0d 02 6c 2b |*FX 21 2|..b...l+|
|00000600| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f |.. "Wimp|_CloseDo|
|00000610| 77 6e 22 2c 74 61 73 6b | 5f 68 61 6e 64 6c 65 25 |wn",task|_handle%|
|00000620| 2c 21 74 61 73 6b 25 0d | 02 76 04 0d 02 80 05 e0 |,!task%.|.v......|
|00000630| 0d 02 8a 04 0d 02 94 4c | 2d 2d 2d 2d 2d 2d 2d 2d |.......L|--------|
|00000640| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000650| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000660| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000680| 0d 02 9e 04 0d 02 a8 13 | dd 20 f2 65 72 72 6f 72 |........|. .error|
|00000690| 28 71 75 69 74 25 29 0d | 02 b2 04 0d 02 bc 0d ea |(quit%).|........|
|000006a0| 20 72 65 70 6f 72 74 24 | 0d 02 c6 04 0d 02 d0 14 | report$|........|
|000006b0| ea 20 85 3a ee 20 85 20 | f2 65 78 69 74 28 b9 29 |. .:. . |.exit(.)|
|000006c0| 0d 02 da 04 0d 02 e4 3b | f4 20 44 69 73 6b 20 6e |.......;|. Disk n|
|000006d0| 6f 74 20 66 6f 75 6e 64 | 2f 6e 6f 74 20 70 72 65 |ot found|/not pre|
|000006e0| 73 65 6e 74 20 2d 20 66 | 69 6c 65 72 20 70 72 6f |sent - f|iler pro|
|000006f0| 76 69 64 65 73 20 65 72 | 72 6f 72 20 62 6f 78 0d |vides er|ror box.|
|00000700| 02 ee 1b e7 20 9f 3d 26 | 31 30 38 44 34 20 84 20 |.... .=&|108D4 . |
|00000710| 9f 3d 26 31 30 38 44 35 | 20 e1 0d 02 f8 04 0d 03 |.=&108D5| .......|
|00000720| 02 17 21 73 74 72 69 6e | 67 5f 62 75 66 66 65 72 |..!strin|g_buffer|
|00000730| 25 20 3d 20 9f 0d 03 0c | 38 72 65 70 6f 72 74 24 |% = ....|8report$|
|00000740| 20 3d 20 f6 24 20 2b 20 | 22 20 28 69 6e 74 65 72 | = .$ + |" (inter|
|00000750| 6e 61 6c 20 65 72 72 6f | 72 20 63 6f 64 65 20 22 |nal erro|r code "|
|00000760| 20 2b 20 c3 28 9e 29 20 | 2b 20 22 29 22 0d 03 16 | + .(.) |+ ")"...|
|00000770| 2c 24 28 73 74 72 69 6e | 67 5f 62 75 66 66 65 72 |,$(strin|g_buffer|
|00000780| 25 2b 34 29 20 3d 20 c0 | 72 65 70 6f 72 74 24 2c |%+4) = .|report$,|
|00000790| 32 35 30 29 20 2b 20 bd | 30 0d 03 20 04 0d 03 2a |250) + .|0.. ...*|
|000007a0| 34 c8 99 20 22 57 69 6d | 70 5f 52 65 70 6f 72 74 |4.. "Wim|p_Report|
|000007b0| 45 72 72 6f 72 22 2c 73 | 74 72 69 6e 67 5f 62 75 |Error",s|tring_bu|
|000007c0| 66 66 65 72 25 2c 31 2c | 61 70 70 5f 6e 61 6d 65 |ffer%,1,|app_name|
|000007d0| 24 0d 03 34 04 0d 03 3e | 14 e7 20 71 75 69 74 25 |$..4...>|.. quit%|
|000007e0| 20 f2 65 78 69 74 28 b9 | 29 0d 03 48 04 0d 03 52 | .exit(.|)..H...R|
|000007f0| 10 f2 72 65 73 65 74 5f | 73 74 61 74 65 0d 03 5c |..reset_|state..\|
|00000800| 04 0d 03 66 05 e1 0d 03 | 70 04 0d 03 7a 4c 2d 2d |...f....|p...zL--|
|00000810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000840| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000850| 2d 2d 2d 2d 2d 2d 0d 03 | 84 04 0d 03 8e 18 dd 20 |------..|....... |
|00000860| a4 63 6f 6e 66 69 72 6d | 28 6d 65 73 73 61 67 65 |.confirm|(message|
|00000870| 24 29 0d 03 98 04 0d 03 | a2 1b ea 20 6d 61 73 6b |$)......|... mask|
|00000880| 25 2c 63 6f 64 65 25 2c | 65 6e 64 25 2c 79 65 73 |%,code%,|end%,yes|
|00000890| 25 0d 03 ac 04 0d 03 b6 | 07 ea 20 85 0d 03 c0 4d |%.......|.. ....M|
|000008a0| ee 20 85 20 f7 20 85 3a | c8 97 20 c8 93 20 30 2c |. . . .:|.. .. 0,|
|000008b0| 30 2c 73 63 72 65 65 6e | 5f 78 25 2c 73 63 72 65 |0,screen|_x%,scre|
|000008c0| 65 6e 5f 79 25 3a f2 63 | 6c 6f 73 65 5f 77 69 6e |en_y%:.c|lose_win|
|000008d0| 64 6f 77 28 65 72 72 6f | 72 5f 77 69 6e 64 6f 77 |dow(erro|r_window|
|000008e0| 25 29 3a 85 20 9f 2c f6 | 24 0d 03 ca 04 0d 03 d4 |%):. .,.|$.......|
|000008f0| 23 e7 20 68 6f 75 72 67 | 6c 61 73 73 25 20 c8 99 |#. hourg|lass% ..|
|00000900| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 66 66 22 | "Hourgl|ass_Off"|
|00000910| 0d 03 de 04 0d 03 e8 20 | 24 65 72 72 6f 72 5f 70 |....... |$error_p|
|00000920| 74 72 25 20 3d 20 c0 6d | 65 73 73 61 67 65 24 2c |tr% = .m|essage$,|
|00000930| 32 35 35 29 0d 03 f2 04 | 0d 03 fc 1f f2 6f 70 65 |255)....|.....ope|
|00000940| 6e 5f 77 69 6e 64 6f 77 | 28 65 72 72 6f 72 5f 77 |n_window|(error_w|
|00000950| 69 6e 64 6f 77 25 29 0d | 04 06 04 0d 04 10 2b c8 |indow%).|......+.|
|00000960| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00000970| 77 4f 75 74 6c 69 6e 65 | 22 2c 2c 77 69 6d 70 5f |wOutline|",,wimp_|
|00000980| 62 6c 6f 63 6b 25 0d 04 | 1a 63 c8 97 20 c8 93 20 |block%..|.c.. .. |
|00000990| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 34 2c 77 69 |wimp_blo|ck%!4,wi|
|000009a0| 6d 70 5f 62 6c 6f 63 6b | 25 21 38 2c 77 69 6d 70 |mp_block|%!8,wimp|
|000009b0| 5f 62 6c 6f 63 6b 25 21 | 31 32 2d 77 69 6d 70 5f |_block%!|12-wimp_|
|000009c0| 62 6c 6f 63 6b 25 21 34 | 2d 31 2c 77 69 6d 70 5f |block%!4|-1,wimp_|
|000009d0| 62 6c 6f 63 6b 25 21 31 | 36 2d 77 69 6d 70 5f 62 |block%!1|6-wimp_b|
|000009e0| 6c 6f 63 6b 25 21 38 2d | 31 0d 04 24 04 0d 04 2e |lock%!8-|1..$....|
|000009f0| 31 6d 61 73 6b 25 20 3d | 20 31 20 2b 20 28 25 31 |1mask% =| 1 + (%1|
|00000a00| 31 3c 3c 34 29 20 2b 20 | 28 25 31 31 3c 3c 31 31 |1<<4) + |(%11<<11|
|00000a10| 29 20 2b 20 28 25 31 31 | 31 3c 3c 31 37 29 0d 04 |) + (%11|1<<17)..|
|00000a20| 38 0d 65 6e 64 25 20 20 | 3d 20 a3 0d 04 42 04 0d |8.end% |= ...B..|
|00000a30| 04 4c 05 f5 0d 04 56 2e | 20 20 c8 99 20 22 57 69 |.L....V.| .. "Wi|
|00000a40| 6d 70 5f 50 6f 6c 6c 22 | 2c 6d 61 73 6b 25 2c 77 |mp_Poll"|,mask%,w|
|00000a50| 69 6d 70 5f 62 6c 6f 63 | 6b 25 20 b8 20 63 6f 64 |imp_bloc|k% . cod|
|00000a60| 65 25 0d 04 60 10 20 20 | c8 8e 20 63 6f 64 65 25 |e%..`. |.. code%|
|00000a70| 20 ca 0d 04 6a 24 20 20 | 20 20 c9 20 36 20 3a 65 | ...j$ | . 6 :e|
|00000a80| 6e 64 25 20 3d 20 a4 79 | 65 73 5f 6f 72 5f 6e 6f |nd% = .y|es_or_no|
|00000a90| 28 79 65 73 25 29 0d 04 | 74 33 20 20 20 20 c9 20 |(yes%)..|t3 . |
|00000aa0| 38 20 3a e7 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |8 :. wim|p_block%|
|00000ab0| 21 32 34 3d 26 31 42 20 | 65 6e 64 25 20 3d 20 b9 |!24=&1B |end% = .|
|00000ac0| 3a 79 65 73 25 20 3d 20 | a3 0d 04 7e 07 20 20 cb |:yes% = |...~. .|
|00000ad0| 0d 04 88 0a fd 20 65 6e | 64 25 0d 04 92 04 0d 04 |..... en|d%......|
|00000ae0| 9c 21 c8 97 20 c8 93 20 | 30 2c 30 2c 73 63 72 65 |.!.. .. |0,0,scre|
|00000af0| 65 6e 5f 78 25 2c 73 63 | 72 65 65 6e 5f 79 25 0d |en_x%,sc|reen_y%.|
|00000b00| 04 a6 20 f2 63 6c 6f 73 | 65 5f 77 69 6e 64 6f 77 |.. .clos|e_window|
|00000b10| 28 65 72 72 6f 72 5f 77 | 69 6e 64 6f 77 25 29 0d |(error_w|indow%).|
|00000b20| 04 b0 04 0d 04 ba 22 e7 | 20 68 6f 75 72 67 6c 61 |......".| hourgla|
|00000b30| 73 73 25 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |ss% .. "|Hourglas|
|00000b40| 73 5f 4f 6e 22 0d 04 c4 | 04 0d 04 ce 0a 3d 20 79 |s_On"...|.....= y|
|00000b50| 65 73 25 0d 04 d8 04 0d | 04 e2 4c 2d 2d 2d 2d 2d |es%.....|..L-----|
|00000b60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ba0| 2d 2d 2d 0d 04 ec 04 0d | 04 f6 18 dd 20 a4 79 65 |---.....|.... .ye|
|00000bb0| 73 5f 6f 72 5f 6e 6f 28 | f8 20 79 65 73 25 29 0d |s_or_no(|. yes%).|
|00000bc0| 05 00 04 0d 05 0a 0c 79 | 65 73 25 20 3d 20 a3 0d |.......y|es% = ..|
|00000bd0| 05 14 04 0d 05 1e 27 e7 | 20 77 69 6d 70 5f 62 6c |......'.| wimp_bl|
|00000be0| 6f 63 6b 25 21 31 32 3c | 3e 65 72 72 6f 72 5f 77 |ock%!12<|>error_w|
|00000bf0| 69 6e 64 6f 77 25 20 3d | 20 a3 0d 05 28 24 e7 20 |indow% =| ...($. |
|00000c00| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 31 36 3d 31 |wimp_blo|ck%!16=1|
|00000c10| 20 79 65 73 25 20 3d 20 | b9 3a 20 3d 20 b9 0d 05 | yes% = |.: = ...|
|00000c20| 32 1a e7 20 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |2.. wimp|_block%!|
|00000c30| 31 36 3d 34 20 3d 20 b9 | 0d 05 3c 04 0d 05 46 07 |16=4 = .|..<...F.|
|00000c40| 3d 20 a3 0d 05 50 04 0d | 05 5a 4c 2d 2d 2d 2d 2d |= ...P..|.ZL-----|
|00000c50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c90| 2d 2d 2d 0d 05 64 04 0d | 05 6e 18 dd 20 f2 6d 65 |---..d..|.n.. .me|
|00000ca0| 73 73 61 67 65 28 6d 65 | 73 73 61 67 65 24 29 0d |ssage(me|ssage$).|
|00000cb0| 05 78 04 0d 05 82 23 e7 | 20 68 6f 75 72 67 6c 61 |.x....#.| hourgla|
|00000cc0| 73 73 25 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |ss% .. "|Hourglas|
|00000cd0| 73 5f 4f 66 66 22 0d 05 | 8c 04 0d 05 96 3d c8 99 |s_Off"..|.....=..|
|00000ce0| 20 22 57 69 6d 70 5f 52 | 65 70 6f 72 74 45 72 72 | "Wimp_R|eportErr|
|00000cf0| 6f 72 22 2c 22 20 20 20 | 20 22 2b 6d 65 73 73 61 |or"," | "+messa|
|00000d00| 67 65 24 2b bd 30 2c 25 | 31 30 30 30 31 2c 61 70 |ge$+.0,%|10001,ap|
|00000d10| 70 5f 6e 61 6d 65 24 0d | 05 a0 04 0d 05 aa 22 e7 |p_name$.|......".|
|00000d20| 20 68 6f 75 72 67 6c 61 | 73 73 25 20 c8 99 20 22 | hourgla|ss% .. "|
|00000d30| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 6e 22 0d 05 b4 |Hourglas|s_On"...|
|00000d40| 04 0d 05 be 05 e1 0d 05 | c8 04 0d 05 d2 4c 2a 2a |........|.....L**|
|00000d50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d90| 2a 2a 2a 2a 2a 2a 0d 05 | dc 04 0d 05 e6 12 49 6e |******..|......In|
|00000da0| 69 74 69 61 6c 69 73 61 | 74 69 6f 6e 0d 05 f0 04 |itialisa|tion....|
|00000db0| 0d 05 fa 4c 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...L****|********|
|00000dc0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000dd0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000de0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000df0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 06 04 04 |********|****....|
|00000e00| 0d 06 0e 10 dd 20 f2 77 | 69 6d 70 5f 69 6e 69 74 |..... .w|imp_init|
|00000e10| 0d 06 18 04 0d 06 22 29 | de 20 77 69 6d 70 5f 62 |......")|. wimp_b|
|00000e20| 6c 6f 63 6b 25 20 31 30 | 32 33 2c 73 74 72 69 6e |lock% 10|23,strin|
|00000e30| 67 5f 62 75 66 66 65 72 | 25 20 32 35 35 0d 06 2c |g_buffer|% 255..,|
|00000e40| 1d de 20 73 61 76 65 61 | 73 5f 62 6c 6f 63 6b 25 |.. savea|s_block%|
|00000e50| 20 38 38 20 2b 20 33 2a | 33 32 0d 06 36 20 de 20 | 88 + 3*|32..6 . |
|00000e60| 66 69 6c 65 69 6e 66 6f | 5f 62 6c 6f 63 6b 25 20 |fileinfo|_block% |
|00000e70| 38 38 20 2b 20 31 37 2a | 33 32 0d 06 40 04 0d 06 |88 + 17*|32..@...|
|00000e80| 4a 1e f4 20 49 6e 69 74 | 69 61 6c 69 73 65 20 76 |J.. Init|ialise v|
|00000e90| 61 72 69 6f 75 73 20 66 | 6c 61 67 73 0d 06 54 27 |arious f|lags..T'|
|00000ea0| 68 6f 75 72 67 6c 61 73 | 73 25 20 20 20 20 3d 20 |hourglas|s% = |
|00000eb0| a3 3a 73 61 76 69 6e 67 | 25 20 20 20 20 20 20 20 |.:saving|% |
|00000ec0| 3d 20 a3 0d 06 5e 27 6d | 6f 64 69 66 69 65 64 25 |= ...^'m|odified%|
|00000ed0| 20 20 20 20 20 3d 20 a3 | 3a 70 69 67 73 5f 63 61 | = .|:pigs_ca|
|00000ee0| 6e 5f 66 6c 79 25 20 3d | 20 a3 0d 06 68 44 75 73 |n_fly% =| ...hDus|
|00000ef0| 69 6e 67 5f 73 63 72 61 | 70 25 20 20 3d 20 2d 31 |ing_scra|p% = -1|
|00000f00| 20 20 20 3a 73 61 76 65 | 64 5f 66 69 6c 65 24 20 | :save|d_file$ |
|00000f10| 20 20 3d 20 22 3c 42 42 | 43 54 61 70 65 24 44 69 | = "<BB|CTape$Di|
|00000f20| 72 3e 2e 78 78 78 78 78 | 78 78 78 78 78 22 0d 06 |r>.xxxxx|xxxxx"..|
|00000f30| 72 1c 76 65 72 73 69 6f | 6e 24 20 20 20 20 20 20 |r.versio|n$ |
|00000f40| 3d 20 22 31 39 20 4d 61 | 72 22 0d 06 7c 04 0d 06 |= "19 Ma|r"..|...|
|00000f50| 86 19 f4 20 47 65 74 20 | 74 68 65 20 73 63 72 65 |... Get |the scre|
|00000f60| 65 6e 20 73 69 7a 65 0d | 06 90 2b 21 77 69 6d 70 |en size.|..+!wimp|
|00000f70| 5f 62 6c 6f 63 6b 25 20 | 20 20 3d 20 20 34 3a 77 |_block% | = 4:w|
|00000f80| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 34 20 20 3d 20 |imp_bloc|k%!4 = |
|00000f90| 20 35 0d 06 9a 2b 77 69 | 6d 70 5f 62 6c 6f 63 6b | 5...+wi|mp_block|
|00000fa0| 25 21 38 20 20 3d 20 31 | 31 3a 77 69 6d 70 5f 62 |%!8 = 1|1:wimp_b|
|00000fb0| 6c 6f 63 6b 25 21 31 32 | 20 3d 20 31 32 0d 06 a4 |lock%!12| = 12...|
|00000fc0| 17 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 31 36 20 |.wimp_bl|ock%!16 |
|00000fd0| 3d 20 2d 31 0d 06 ae 37 | c8 99 20 22 4f 53 5f 52 |= -1...7|.. "OS_R|
|00000fe0| 65 61 64 56 64 75 56 61 | 72 69 61 62 6c 65 73 22 |eadVduVa|riables"|
|00000ff0| 2c 77 69 6d 70 5f 62 6c | 6f 63 6b 25 2c 77 69 6d |,wimp_bl|ock%,wim|
|00001000| 70 5f 62 6c 6f 63 6b 25 | 2b 32 30 0d 06 b8 3a 73 |p_block%|+20...:s|
|00001010| 63 72 65 65 6e 5f 78 25 | 20 3d 20 28 31 20 3c 3c |creen_x%| = (1 <<|
|00001020| 20 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 32 30 29 | wimp_bl|ock%!20)|
|00001030| 2a 28 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 32 38 |*(wimp_b|lock%!28|
|00001040| 20 2b 20 31 29 0d 06 c2 | 3a 73 63 72 65 65 6e 5f | + 1)...|:screen_|
|00001050| 79 25 20 3d 20 28 31 20 | 3c 3c 20 77 69 6d 70 5f |y% = (1 |<< wimp_|
|00001060| 62 6c 6f 63 6b 25 21 32 | 34 29 2a 28 77 69 6d 70 |block%!2|4)*(wimp|
|00001070| 5f 62 6c 6f 63 6b 25 21 | 33 32 20 2b 20 31 29 0d |_block%!|32 + 1).|
|00001080| 06 cc 04 0d 06 d6 45 f4 | 20 4d 61 73 6b 20 6f 75 |......E.| Mask ou|
|00001090| 74 20 6e 75 6c 6c 2c 20 | 70 6f 69 6e 74 65 72 20 |t null, |pointer |
|000010a0| 6c 65 61 76 69 6e 67 2f | 65 6e 74 65 72 69 6e 67 |leaving/|entering|
|000010b0| 20 77 69 6e 64 6f 77 2c | 20 6c 6f 73 65 2f 67 61 | window,| lose/ga|
|000010c0| 69 6e 20 63 61 72 65 74 | 0d 06 e0 39 70 6f 6c 6c |in caret|...9poll|
|000010d0| 5f 6d 61 73 6b 25 20 3d | 20 31 20 2b 20 28 25 31 |_mask% =| 1 + (%1|
|000010e0| 31 3c 3c 34 29 20 2b 20 | 28 25 31 31 3c 3c 31 31 |1<<4) + |(%11<<11|
|000010f0| 29 3a 70 6f 6c 6c 5f 74 | 69 6d 65 25 20 3d 20 31 |):poll_t|ime% = 1|
|00001100| 30 0d 06 f4 04 0d 06 fe | 0d f2 69 63 6f 6e 5f 62 |0.......|..icon_b|
|00001110| 61 72 0d 07 08 04 0d 07 | 12 13 f2 6c 6f 61 64 5f |ar......|...load_|
|00001120| 74 65 6d 70 6c 61 74 65 | 73 0d 07 1c 04 0d 07 26 |template|s......&|
|00001130| 10 f2 63 72 65 61 74 65 | 5f 6d 65 6e 75 0d 07 30 |..create|_menu..0|
|00001140| 04 0d 07 3a 09 f2 69 6e | 66 6f 0d 07 44 04 0d 07 |...:..in|fo..D...|
|00001150| 4e 05 e1 0d 07 58 04 0d | 07 62 4c 2d 2d 2d 2d 2d |N....X..|.bL-----|
|00001160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011a0| 2d 2d 2d 0d 07 6c 04 0d | 07 76 0f dd 20 f2 69 63 |---..l..|.v.. .ic|
|000011b0| 6f 6e 5f 62 61 72 0d 07 | 80 04 0d 07 8a 17 21 77 |on_bar..|......!w|
|000011c0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 20 20 20 3d 20 2d |imp_bloc|k% = -|
|000011d0| 32 0d 07 94 2b 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |2...+wim|p_block%|
|000011e0| 21 34 20 20 3d 20 20 30 | 3a 77 69 6d 70 5f 62 6c |!4 = 0|:wimp_bl|
|000011f0| 6f 63 6b 25 21 38 20 20 | 3d 20 20 30 0d 07 9e 2b |ock%!8 |= 0...+|
|00001200| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 31 32 20 3d |wimp_blo|ck%!12 =|
|00001210| 20 36 38 3a 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 | 68:wimp|_block%!|
|00001220| 31 36 20 3d 20 36 38 0d | 07 a8 21 f4 20 53 70 72 |16 = 68.|..!. Spr|
|00001230| 69 74 65 2c 20 63 6c 69 | 63 6b 20 6e 6f 74 69 66 |ite, cli|ck notif|
|00001240| 69 65 73 20 6f 6e 63 65 | 0d 07 b2 25 77 69 6d 70 |ies once|...%wimp|
|00001250| 5f 62 6c 6f 63 6b 25 21 | 32 30 20 3d 20 28 31 3c |_block%!|20 = (1<|
|00001260| 3c 31 29 20 2b 20 28 33 | 3c 3c 31 32 29 0d 07 bc |<1) + (3|<<12)...|
|00001270| 27 24 28 77 69 6d 70 5f | 62 6c 6f 63 6b 25 2b 32 |'$(wimp_|block%+2|
|00001280| 34 29 20 3d 20 22 21 22 | 20 2b 20 61 70 70 5f 6e |4) = "!"| + app_n|
|00001290| 61 6d 65 24 0d 07 c6 04 | 0d 07 d0 25 c8 99 20 22 |ame$....|...%.. "|
|000012a0| 57 69 6d 70 5f 43 72 65 | 61 74 65 49 63 6f 6e 22 |Wimp_Cre|ateIcon"|
|000012b0| 2c 2c 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 0d 07 da |,,wimp_b|lock%...|
|000012c0| 04 0d 07 e4 05 e1 0d 07 | ee 04 0d 07 f8 4c 2d 2d |........|.....L--|
|000012d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000012e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000012f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001310| 2d 2d 2d 2d 2d 2d 0d 08 | 02 04 0d 08 0c 15 dd 20 |------..|....... |
|00001320| f2 6c 6f 61 64 5f 74 65 | 6d 70 6c 61 74 65 73 0d |.load_te|mplates.|
|00001330| 08 16 04 0d 08 20 1f ea | 20 6e 61 6d 65 25 2c 70 |..... ..| name%,p|
|00001340| 74 72 25 2c 69 6e 64 5f | 62 75 66 66 65 72 25 2c |tr%,ind_|buffer%,|
|00001350| 69 25 0d 08 2a 04 0d 08 | 34 1f de 20 6e 61 6d 65 |i%..*...|4.. name|
|00001360| 25 20 31 32 2c 69 6e 64 | 5f 62 75 66 66 65 72 25 |% 12,ind|_buffer%|
|00001370| 20 31 30 32 33 0d 08 3e | 04 0d 08 48 3f c8 99 20 | 1023..>|...H?.. |
|00001380| 22 57 69 6d 70 5f 4f 70 | 65 6e 54 65 6d 70 6c 61 |"Wimp_Op|enTempla|
|00001390| 74 65 22 2c 2c 22 3c 22 | 20 2b 20 61 70 70 5f 6e |te",,"<"| + app_n|
|000013a0| 61 6d 65 24 20 2b 20 22 | 24 44 69 72 3e 2e 54 65 |ame$ + "|$Dir>.Te|
|000013b0| 6d 70 6c 61 74 65 73 22 | 0d 08 52 04 0d 08 5c 17 |mplates"|..R...\.|
|000013c0| f4 20 53 61 76 65 20 64 | 69 61 6c 6f 67 75 65 20 |. Save d|ialogue |
|000013d0| 62 6f 78 0d 08 66 15 24 | 6e 61 6d 65 25 20 3d 20 |box..f.$|name% = |
|000013e0| 22 73 61 76 65 61 73 22 | 0d 08 70 58 c8 99 20 22 |"saveas"|..pX.. "|
|000013f0| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00001400| 65 22 2c 2c 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 2c |e",,wimp|_block%,|
|00001410| 69 6e 64 5f 62 75 66 66 | 65 72 25 2c 69 6e 64 5f |ind_buff|er%,ind_|
|00001420| 62 75 66 66 65 72 25 2b | 31 30 32 33 2c 2d 31 2c |buffer%+|1023,-1,|
|00001430| 6e 61 6d 65 25 2c 30 20 | b8 20 2c 2c 70 74 72 25 |name%,0 |. ,,ptr%|
|00001440| 0d 08 7a 16 e3 20 69 25 | 3d 30 20 b8 20 38 38 2b |..z.. i%|=0 . 88+|
|00001450| 33 2a 33 32 2d 31 0d 08 | 84 27 20 20 73 61 76 65 |3*32-1..|.' save|
|00001460| 61 73 5f 62 6c 6f 63 6b | 25 21 69 25 20 3d 20 77 |as_block|%!i% = w|
|00001470| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 69 25 0d 08 8e |imp_bloc|k%!i%...|
|00001480| 05 ed 0d 08 98 21 73 61 | 76 65 5f 70 74 72 25 20 |.....!sa|ve_ptr% |
|00001490| 3d 20 73 61 76 65 61 73 | 5f 62 6c 6f 63 6b 25 21 |= saveas|_block%!|
|000014a0| 31 34 30 0d 08 a2 33 c8 | 99 20 22 57 69 6d 70 5f |140...3.|. "Wimp_|
|000014b0| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 73 |CreateWi|ndow",,s|
|000014c0| 61 76 65 61 73 5f 62 6c | 6f 63 6b 25 20 b8 20 73 |aveas_bl|ock% . s|
|000014d0| 61 76 65 61 73 25 0d 08 | ac 04 0d 08 b6 16 f4 20 |aveas%..|....... |
|000014e0| 46 69 6c 65 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |File inf|ormation|
|000014f0| 0d 08 c0 17 24 6e 61 6d | 65 25 20 3d 20 22 66 69 |....$nam|e% = "fi|
|00001500| 6c 65 49 6e 66 6f 22 0d | 08 ca 51 c8 99 20 22 57 |leInfo".|..Q.. "W|
|00001510| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00001520| 22 2c 2c 77 69 6d 70 5f | 62 6c 6f 63 6b 25 2c 70 |",,wimp_|block%,p|
|00001530| 74 72 25 2c 69 6e 64 5f | 62 75 66 66 65 72 25 2b |tr%,ind_|buffer%+|
|00001540| 31 30 32 33 2c 2d 31 2c | 6e 61 6d 65 25 2c 30 20 |1023,-1,|name%,0 |
|00001550| b8 20 2c 2c 70 74 72 25 | 0d 08 d4 17 e3 20 69 25 |. ,,ptr%|..... i%|
|00001560| 3d 30 20 b8 20 38 38 2b | 31 37 2a 33 32 2d 31 0d |=0 . 88+|17*32-1.|
|00001570| 08 de 29 20 20 66 69 6c | 65 69 6e 66 6f 5f 62 6c |..) fil|einfo_bl|
|00001580| 6f 63 6b 25 21 69 25 20 | 3d 20 77 69 6d 70 5f 62 |ock%!i% |= wimp_b|
|00001590| 6c 6f 63 6b 25 21 69 25 | 0d 08 e8 05 ed 0d 08 f2 |lock%!i%|........|
|000015a0| 2c 66 69 6c 65 69 6e 66 | 6f 5f 62 6c 6f 63 6b 25 |,fileinf|o_block%|
|000015b0| 21 28 31 30 38 2b 34 2a | 33 32 29 20 20 20 3d 20 |!(108+4*|32) = |
|000015c0| 73 61 76 65 5f 70 74 72 | 25 0d 08 fc 34 66 69 6c |save_ptr|%...4fil|
|000015d0| 65 69 6e 66 6f 5f 62 6c | 6f 63 6b 25 21 28 31 30 |einfo_bl|ock%!(10|
|000015e0| 38 2b 34 2a 33 32 2b 38 | 29 20 3d 20 73 61 76 65 |8+4*32+8|) = save|
|000015f0| 61 73 5f 62 6c 6f 63 6b | 25 21 31 34 38 0d 09 06 |as_block|%!148...|
|00001600| 2d 74 79 70 65 5f 62 75 | 66 66 65 72 25 20 3d 20 |-type_bu|ffer% = |
|00001610| 66 69 6c 65 69 6e 66 6f | 5f 62 6c 6f 63 6b 25 21 |fileinfo|_block%!|
|00001620| 28 31 30 38 2b 33 2a 33 | 32 29 0d 09 10 37 c8 99 |(108+3*3|2)...7..|
|00001630| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|00001640| 64 6f 77 22 2c 2c 66 69 | 6c 65 69 6e 66 6f 5f 62 |dow",,fi|leinfo_b|
|00001650| 6c 6f 63 6b 25 20 b8 20 | 66 69 6c 65 69 6e 66 6f |lock% . |fileinfo|
|00001660| 25 0d 09 1a 04 0d 09 24 | 16 f4 20 79 65 73 2f 6e |%......$|.. yes/n|
|00001670| 6f 20 65 72 72 6f 72 20 | 62 6f 78 0d 09 2e 14 24 |o error |box....$|
|00001680| 6e 61 6d 65 25 20 3d 20 | 22 65 72 72 6f 72 22 0d |name% = |"error".|
|00001690| 09 38 51 c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |.8Q.. "W|imp_Load|
|000016a0| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 77 69 6d 70 5f |Template|",,wimp_|
|000016b0| 62 6c 6f 63 6b 25 2c 70 | 74 72 25 2c 69 6e 64 5f |block%,p|tr%,ind_|
|000016c0| 62 75 66 66 65 72 25 2b | 31 30 32 33 2c 2d 31 2c |buffer%+|1023,-1,|
|000016d0| 6e 61 6d 65 25 2c 30 20 | b8 20 2c 2c 70 74 72 25 |name%,0 |. ,,ptr%|
|000016e0| 0d 09 42 20 65 72 72 6f | 72 5f 70 74 72 25 20 3d |..B erro|r_ptr% =|
|000016f0| 20 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 31 30 38 | wimp_bl|ock%!108|
|00001700| 0d 09 4c 37 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |..L7.. "|Wimp_Cre|
|00001710| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 77 69 6d 70 |ateWindo|w",,wimp|
|00001720| 5f 62 6c 6f 63 6b 25 20 | b8 20 65 72 72 6f 72 5f |_block% |. error_|
|00001730| 77 69 6e 64 6f 77 25 0d | 09 56 04 0d 09 60 16 f4 |window%.|.V...`..|
|00001740| 20 50 72 6f 67 72 61 6d | 20 69 6e 66 6f 20 62 6f | Program| info bo|
|00001750| 78 0d 09 6a 17 24 6e 61 | 6d 65 25 20 3d 20 22 70 |x..j.$na|me% = "p|
|00001760| 72 6f 67 69 6e 66 6f 22 | 0d 09 74 51 c8 99 20 22 |roginfo"|..tQ.. "|
|00001770| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00001780| 65 22 2c 2c 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 2c |e",,wimp|_block%,|
|00001790| 70 74 72 25 2c 69 6e 64 | 5f 62 75 66 66 65 72 25 |ptr%,ind|_buffer%|
|000017a0| 2b 31 30 32 33 2c 2d 31 | 2c 6e 61 6d 65 25 2c 30 |+1023,-1|,name%,0|
|000017b0| 20 b8 20 2c 2c 70 74 72 | 25 0d 09 7e 3f 24 28 77 | . ,,ptr|%..~?$(w|
|000017c0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 32 33 36 29 20 |imp_bloc|k%!236) |
|000017d0| 3d 20 c0 22 31 2e 30 30 | 20 28 32 35 2d 46 65 62 |= ."1.00| (25-Feb|
|000017e0| 2d 31 39 39 31 29 22 2c | 77 69 6d 70 5f 62 6c 6f |-1991)",|wimp_blo|
|000017f0| 63 6b 25 21 32 34 34 29 | 0d 09 88 33 c8 99 20 22 |ck%!244)|...3.. "|
|00001800| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00001810| 77 22 2c 2c 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 20 |w",,wimp|_block% |
|00001820| b8 20 70 72 6f 67 69 6e | 66 6f 25 0d 09 92 04 0d |. progin|fo%.....|
|00001830| 09 9c 13 f4 20 53 74 61 | 74 75 73 20 77 69 6e 64 |.... Sta|tus wind|
|00001840| 6f 77 0d 09 a6 15 24 6e | 61 6d 65 25 20 3d 20 22 |ow....$n|ame% = "|
|00001850| 73 74 61 74 75 73 22 0d | 09 b0 48 c8 99 20 22 57 |status".|..H.. "W|
|00001860| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00001870| 22 2c 2c 77 69 6d 70 5f | 62 6c 6f 63 6b 25 2c 70 |",,wimp_|block%,p|
|00001880| 74 72 25 2c 69 6e 64 5f | 62 75 66 66 65 72 25 2b |tr%,ind_|buffer%+|
|00001890| 31 30 32 33 2c 2d 31 2c | 6e 61 6d 65 25 2c 30 0d |1023,-1,|name%,0.|
|000018a0| 09 ba 2b 73 74 61 74 75 | 73 5f 6c 65 6e 67 74 68 |..+statu|s_length|
|000018b0| 25 20 3d 20 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |% = wimp|_block%!|
|000018c0| 28 31 30 38 2b 32 2a 33 | 32 29 0d 09 c4 2b 73 74 |(108+2*3|2)...+st|
|000018d0| 61 74 75 73 5f 62 79 74 | 65 73 25 20 20 3d 20 77 |atus_byt|es% = w|
|000018e0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 28 31 30 38 2b |imp_bloc|k%!(108+|
|000018f0| 33 2a 33 32 29 0d 09 ce | 2b 73 74 61 74 75 73 5f |3*32)...|+status_|
|00001900| 72 61 74 65 25 20 20 20 | 3d 20 77 69 6d 70 5f 62 |rate% |= wimp_b|
|00001910| 6c 6f 63 6b 25 21 28 31 | 30 38 2b 34 2a 33 32 29 |lock%!(1|08+4*32)|
|00001920| 0d 09 d8 2b 73 74 61 74 | 75 73 5f 63 72 63 25 20 |...+stat|us_crc% |
|00001930| 20 20 20 3d 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 | = wim|p_block%|
|00001940| 21 28 31 30 38 2b 39 2a | 33 32 29 0d 09 e2 38 c8 |!(108+9*|32)...8.|
|00001950| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 57 69 |. "Wimp_|CreateWi|
|00001960| 6e 64 6f 77 22 2c 2c 77 | 69 6d 70 5f 62 6c 6f 63 |ndow",,w|imp_bloc|
|00001970| 6b 25 20 b8 20 73 74 61 | 74 75 73 5f 77 69 6e 64 |k% . sta|tus_wind|
|00001980| 6f 77 25 0d 09 ec 04 0d | 09 f6 1b c8 99 20 22 57 |ow%.....|..... "W|
|00001990| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|000019a0| 65 22 0d 0a 00 04 0d 0a | 0a 05 e1 0d 0a 14 04 0d |e"......|........|
|000019b0| 0a 1e 4c 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..L-----|--------|
|000019c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000019d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000019e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000019f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0a 28 04 0d |--------|---..(..|
|00001a00| 0a 32 12 dd 20 f2 63 72 | 65 61 74 65 5f 6d 65 6e |.2.. .cr|eate_men|
|00001a10| 75 0d 0a 3c 04 0d 0a 46 | 1b ea 20 69 25 2c 6e 61 |u..<...F|.. i%,na|
|00001a20| 6d 65 24 2c 77 69 64 74 | 68 25 2c 74 65 6d 70 25 |me$,widt|h%,temp%|
|00001a30| 0d 0a 50 04 0d 0a 5a 21 | de 20 6e 61 6d 65 5f 62 |..P...Z!|. name_b|
|00001a40| 6c 6f 63 6b 25 20 35 32 | 2c 6e 61 6d 65 5f 70 74 |lock% 52|,name_pt|
|00001a50| 72 25 20 31 30 0d 0a 64 | 21 de 20 74 79 70 65 5f |r% 10..d|!. type_|
|00001a60| 62 6c 6f 63 6b 25 20 35 | 32 2c 74 79 70 65 5f 70 |block% 5|2,type_p|
|00001a70| 74 72 25 20 20 38 0d 0a | 6e 2f de 20 6c 6f 61 64 |tr% 8..|n/. load|
|00001a80| 5f 62 6c 6f 63 6b 25 20 | 35 32 2c 6c 6f 61 64 5f |_block% |52,load_|
|00001a90| 70 74 72 25 20 20 34 2c | 68 65 78 5f 76 61 6c 69 |ptr% 4,|hex_vali|
|00001aa0| 64 25 20 31 30 0d 0a 78 | 21 de 20 65 78 65 63 5f |d% 10..x|!. exec_|
|00001ab0| 62 6c 6f 63 6b 25 20 35 | 32 2c 65 78 65 63 5f 70 |block% 5|2,exec_p|
|00001ac0| 74 72 25 20 20 34 0d 0a | 82 04 0d 0a 8c 24 24 6e |tr% 4..|.....$$n|
|00001ad0| 61 6d 65 5f 70 74 72 25 | 20 20 3d 20 22 22 3a 24 |ame_ptr%| = "":$|
|00001ae0| 74 79 70 65 5f 70 74 72 | 25 20 3d 20 22 22 0d 0a |type_ptr|% = ""..|
|00001af0| 96 24 24 6c 6f 61 64 5f | 70 74 72 25 20 20 3d 20 |.$$load_|ptr% = |
|00001b00| 22 22 3a 24 65 78 65 63 | 5f 70 74 72 25 20 3d 20 |"":$exec|_ptr% = |
|00001b10| 22 22 0d 0a a0 1e 24 68 | 65 78 5f 76 61 6c 69 64 |""....$h|ex_valid|
|00001b20| 25 20 3d 20 22 61 30 2d | 39 61 2d 66 41 2d 46 22 |% = "a0-|9a-fA-F"|
|00001b30| 0d 0a aa 04 0d 0a b4 41 | f2 77 72 69 74 65 61 62 |.......A|.writeab|
|00001b40| 6c 65 5f 6d 65 6e 75 28 | 6e 61 6d 65 5f 62 6c 6f |le_menu(|name_blo|
|00001b50| 63 6b 25 2c 22 46 69 6c | 65 20 6e 61 6d 65 22 2c |ck%,"Fil|e name",|
|00001b60| 31 31 2c 30 2c 6e 61 6d | 65 5f 70 74 72 25 2c 31 |11,0,nam|e_ptr%,1|
|00001b70| 31 2c 2d 31 29 0d 0a be | 40 f2 77 72 69 74 65 61 |1,-1)...|@.writea|
|00001b80| 62 6c 65 5f 6d 65 6e 75 | 28 74 79 70 65 5f 62 6c |ble_menu|(type_bl|
|00001b90| 6f 63 6b 25 2c 22 46 69 | 6c 65 20 74 79 70 65 22 |ock%,"Fi|le type"|
|00001ba0| 2c 31 30 2c 30 2c 74 79 | 70 65 5f 70 74 72 25 2c |,10,0,ty|pe_ptr%,|
|00001bb0| 39 2c 2d 31 29 0d 0a c8 | 4b f2 77 72 69 74 65 61 |9,-1)...|K.writea|
|00001bc0| 62 6c 65 5f 6d 65 6e 75 | 28 6c 6f 61 64 5f 62 6c |ble_menu|(load_bl|
|00001bd0| 6f 63 6b 25 2c 22 4c 6f | 61 64 20 61 64 64 72 65 |ock%,"Lo|ad addre|
|00001be0| 73 73 22 2c 31 33 2c 30 | 2c 6c 6f 61 64 5f 70 74 |ss",13,0|,load_pt|
|00001bf0| 72 25 2c 35 2c 68 65 78 | 5f 76 61 6c 69 64 25 29 |r%,5,hex|_valid%)|
|00001c00| 0d 0a d2 4b f2 77 72 69 | 74 65 61 62 6c 65 5f 6d |...K.wri|teable_m|
|00001c10| 65 6e 75 28 65 78 65 63 | 5f 62 6c 6f 63 6b 25 2c |enu(exec|_block%,|
|00001c20| 22 45 78 65 63 20 61 64 | 64 72 65 73 73 22 2c 31 |"Exec ad|dress",1|
|00001c30| 33 2c 30 2c 65 78 65 63 | 5f 70 74 72 25 2c 35 2c |3,0,exec|_ptr%,5,|
|00001c40| 68 65 78 5f 76 61 6c 69 | 64 25 29 0d 0a dc 04 0d |hex_vali|d%).....|
|00001c50| 0a e6 08 f7 20 2b 30 0d | 0a f0 04 0d 0a fa 1d f3 |.... +0.|........|
|00001c60| 20 6d 65 6e 75 5f 6d 61 | 78 25 2c 6c 65 6e 5f 6d | menu_ma|x%,len_m|
|00001c70| 65 6e 75 5f 6d 61 78 25 | 0d 0b 04 24 de 20 6d 65 |enu_max%|...$. me|
|00001c80| 6e 75 24 28 6c 65 6e 5f | 6d 65 6e 75 5f 6d 61 78 |nu$(len_|menu_max|
|00001c90| 25 2c 6d 65 6e 75 5f 6d | 61 78 25 29 0d 0b 0e 37 |%,menu_m|ax%)...7|
|00001ca0| de 20 6d 65 6e 75 5f 62 | 6c 6f 63 6b 25 28 6d 65 |. menu_b|lock%(me|
|00001cb0| 6e 75 5f 6d 61 78 25 29 | 2c 6e 75 6d 5f 6d 65 6e |nu_max%)|,num_men|
|00001cc0| 75 5f 69 74 65 6d 73 25 | 28 6d 65 6e 75 5f 6d 61 |u_items%|(menu_ma|
|00001cd0| 78 25 29 0d 0b 18 04 0d | 0b 22 16 e3 20 69 25 3d |x%).....|.".. i%=|
|00001ce0| 30 20 b8 20 6d 65 6e 75 | 5f 6d 61 78 25 0d 0b 2c |0 . menu|_max%..,|
|00001cf0| 28 20 20 f3 20 6e 61 6d | 65 24 2c 6e 75 6d 5f 6d |( . nam|e$,num_m|
|00001d00| 65 6e 75 5f 69 74 65 6d | 73 25 28 69 25 29 2c 77 |enu_item|s%(i%),w|
|00001d10| 69 64 74 68 25 0d 0b 36 | 29 20 20 de 20 74 65 6d |idth%..6|) . tem|
|00001d20| 70 25 20 32 38 20 2b 20 | 32 34 2a 6e 75 6d 5f 6d |p% 28 + |24*num_m|
|00001d30| 65 6e 75 5f 69 74 65 6d | 73 25 28 69 25 29 0d 0b |enu_item|s%(i%)..|
|00001d40| 40 1d 20 20 6d 65 6e 75 | 5f 62 6c 6f 63 6b 25 28 |@. menu|_block%(|
|00001d50| 69 25 29 20 3d 20 74 65 | 6d 70 25 0d 0b 4a 2f 20 |i%) = te|mp%..J/ |
|00001d60| 20 f2 62 75 69 6c 64 5f | 6d 65 6e 75 28 6d 65 6e | .build_|menu(men|
|00001d70| 75 5f 62 6c 6f 63 6b 25 | 28 69 25 29 2c 6e 61 6d |u_block%|(i%),nam|
|00001d80| 65 24 2c 77 69 64 74 68 | 25 29 0d 0b 54 05 ed 0d |e$,width|%)..T...|
|00001d90| 0b 5e 04 0d 0b 68 16 e3 | 20 69 25 3d 30 20 b8 20 |.^...h..| i%=0 . |
|00001da0| 6d 65 6e 75 5f 6d 61 78 | 25 0d 0b 72 3f 20 20 f2 |menu_max|%..r? .|
|00001db0| 62 75 69 6c 64 5f 6d 65 | 6e 75 5f 69 74 65 6d 73 |build_me|nu_items|
|00001dc0| 28 6d 65 6e 75 5f 62 6c | 6f 63 6b 25 28 69 25 29 |(menu_bl|ock%(i%)|
|00001dd0| 2c 6e 75 6d 5f 6d 65 6e | 75 5f 69 74 65 6d 73 25 |,num_men|u_items%|
|00001de0| 28 69 25 29 2c 69 25 29 | 0d 0b 7c 05 ed 0d 0b 86 |(i%),i%)|..|.....|
|00001df0| 04 0d 0b 90 29 f4 20 4e | 6f 2e 20 6f 66 20 6d 65 |....). N|o. of me|
|00001e00| 6e 75 73 20 2d 20 31 2c | 20 6c 65 6e 67 74 68 20 |nus - 1,| length |
|00001e10| 6f 66 20 6c 6f 6e 67 65 | 73 74 0d 0b 9a 09 dc 20 |of longe|st..... |
|00001e20| 32 2c 38 0d 0b a4 04 0d | 0b ae 1f f4 20 4e 61 6d |2,8.....|.... Nam|
|00001e30| 65 2c 20 6e 6f 2e 20 6f | 66 20 69 74 65 6d 73 2c |e, no. o|f items,|
|00001e40| 20 77 69 64 74 68 0d 0b | b8 13 dc 20 22 42 42 43 | width..|... "BBC|
|00001e50| 54 61 70 65 22 2c 36 2c | 39 0d 0b c2 14 dc 20 22 |Tape",6,|9..... "|
|00001e60| 4d 69 73 63 22 20 20 20 | 2c 36 2c 31 31 0d 0b cc |Misc" |,6,11...|
|00001e70| 14 dc 20 22 4f 70 74 69 | 6f 6e 73 22 2c 38 2c 31 |.. "Opti|ons",8,1|
|00001e80| 33 0d 0b d6 04 0d 0b e0 | 32 f4 20 49 74 65 6d 20 |3.......|2. Item |
|00001e90| 74 65 78 74 2c 20 74 69 | 63 6b 2c 20 73 68 61 64 |text, ti|ck, shad|
|00001ea0| 65 2c 20 64 6f 74 2c 20 | 6e 6f 74 69 66 79 2c 20 |e, dot, |notify, |
|00001eb0| 70 6f 69 6e 74 65 72 0d | 0b ea 04 0d 0b f4 2b dc |pointer.|......+.|
|00001ec0| 20 22 4d 69 73 63 22 20 | 20 20 20 20 20 20 20 2c | "Misc" | ,|
|00001ed0| 30 2c 30 2c 30 2c 30 2c | 6d 65 6e 75 5f 62 6c 6f |0,0,0,0,|menu_blo|
|00001ee0| 63 6b 25 28 31 29 0d 0b | fe 24 dc 20 22 53 61 76 |ck%(1)..|.$. "Sav|
|00001ef0| 65 22 20 20 20 20 20 20 | 20 20 2c 30 2c 30 2c 30 |e" | ,0,0,0|
|00001f00| 2c 31 2c 73 61 76 65 61 | 73 25 0d 0c 08 2b dc 20 |,1,savea|s%...+. |
|00001f10| 22 4f 70 74 69 6f 6e 73 | 22 20 20 20 20 20 2c 30 |"Options|" ,0|
|00001f20| 2c 30 2c 30 2c 30 2c 6d | 65 6e 75 5f 62 6c 6f 63 |,0,0,0,m|enu_bloc|
|00001f30| 6b 25 28 32 29 0d 0c 12 | 28 dc 20 22 55 70 6c 6f |k%(2)...|(. "Uplo|
|00001f40| 61 64 22 20 20 20 20 20 | 20 2c 30 2c 30 2c 30 2c |ad" | ,0,0,0,|
|00001f50| 30 2c 6e 61 6d 65 5f 62 | 6c 6f 63 6b 25 0d 0c 1c |0,name_b|lock%...|
|00001f60| 1f dc 20 22 44 6f 77 6e | 6c 6f 61 64 22 20 20 20 |.. "Down|load" |
|00001f70| 20 2c 30 2c 30 2c 31 2c | 30 2c 2d 31 0d 0c 26 1f | ,0,0,1,|0,-1..&.|
|00001f80| dc 20 22 51 75 69 74 22 | 20 20 20 20 20 20 20 20 |. "Quit"| |
|00001f90| 2c 30 2c 30 2c 30 2c 30 | 2c 2d 31 0d 0c 30 04 0d |,0,0,0,0|,-1..0..|
|00001fa0| 0c 3a 26 dc 20 22 49 6e | 66 6f 22 20 20 20 20 20 |.:&. "In|fo" |
|00001fb0| 20 20 20 2c 30 2c 30 2c | 30 2c 30 2c 70 72 6f 67 | ,0,0,|0,0,prog|
|00001fc0| 69 6e 66 6f 25 0d 0c 44 | 26 dc 20 22 46 69 6c 65 |info%..D|&. "File|
|00001fd0| 22 20 20 20 20 20 20 20 | 20 2c 30 2c 30 2c 30 2c |" | ,0,0,0,|
|00001fe0| 31 2c 66 69 6c 65 69 6e | 66 6f 25 0d 0c 4e 1f dc |1,filein|fo%..N..|
|00001ff0| 20 22 53 74 61 74 75 73 | 20 2e 2e 2e 22 20 20 2c | "Status| ..." ,|
|00002000| 30 2c 30 2c 31 2c 30 2c | 2d 31 0d 0c 58 1f dc 20 |0,0,1,0,|-1..X.. |
|00002010| 22 39 36 30 30 2c 20 38 | 6e 31 22 20 20 20 2c 30 |"9600, 8|n1" ,0|
|00002020| 2c 30 2c 31 2c 30 2c 2d | 31 0d 0c 62 1f dc 20 22 |,0,1,0,-|1..b.. "|
|00002030| 52 65 73 65 74 22 20 20 | 20 20 20 20 20 2c 30 2c |Reset" | ,0,|
|00002040| 30 2c 30 2c 30 2c 2d 31 | 0d 0c 6c 1f dc 20 22 43 |0,0,0,-1|..l.. "C|
|00002050| 6c 65 61 72 22 20 20 20 | 20 20 20 20 2c 30 2c 30 |lear" | ,0,0|
|00002060| 2c 30 2c 30 2c 2d 31 0d | 0c 76 04 0d 0c 80 28 dc |,0,0,-1.|.v....(.|
|00002070| 20 22 46 69 6c 65 20 74 | 79 70 65 22 20 20 20 2c | "File t|ype" ,|
|00002080| 30 2c 30 2c 30 2c 30 2c | 74 79 70 65 5f 62 6c 6f |0,0,0,0,|type_blo|
|00002090| 63 6b 25 0d 0c 8a 28 dc | 20 22 4c 6f 61 64 20 61 |ck%...(.| "Load a|
|000020a0| 64 64 72 65 73 73 22 2c | 31 2c 30 2c 30 2c 30 2c |ddress",|1,0,0,0,|
|000020b0| 6c 6f 61 64 5f 62 6c 6f | 63 6b 25 0d 0c 94 28 dc |load_blo|ck%...(.|
|000020c0| 20 22 45 78 65 63 20 61 | 64 64 72 65 73 73 22 2c | "Exec a|ddress",|
|000020d0| 31 2c 30 2c 31 2c 30 2c | 65 78 65 63 5f 62 6c 6f |1,0,1,0,|exec_blo|
|000020e0| 63 6b 25 0d 0c 9e 1f dc | 20 22 43 52 20 89 20 4c |ck%.....| "CR . L|
|000020f0| 46 22 20 20 20 20 20 2c | 30 2c 30 2c 30 2c 30 2c |F" ,|0,0,0,0,|
|00002100| 2d 31 0d 0c a8 1f dc 20 | 22 47 75 65 73 73 20 74 |-1..... |"Guess t|
|00002110| 79 70 65 22 20 20 2c 30 | 2c 30 2c 30 2c 30 2c 2d |ype" ,0|,0,0,0,-|
|00002120| 31 0d 0c b2 1f dc 20 22 | 41 75 74 6f 20 6c 6f 61 |1..... "|Auto loa|
|00002130| 64 22 20 20 20 2c 30 2c | 30 2c 30 2c 30 2c 2d 31 |d" ,0,|0,0,0,-1|
|00002140| 0d 0c bc 1f dc 20 22 46 | 61 73 74 20 6c 6f 61 64 |..... "F|ast load|
|00002150| 22 20 20 20 2c 31 2c 30 | 2c 30 2c 30 2c 2d 31 0d |" ,1,0|,0,0,-1.|
|00002160| 0c c6 1f dc 20 22 55 73 | 65 20 42 47 45 54 22 20 |.... "Us|e BGET" |
|00002170| 20 20 20 2c 30 2c 30 2c | 30 2c 30 2c 2d 31 0d 0c | ,0,0,|0,0,-1..|
|00002180| d0 04 0d 0c da 05 e1 0d | 0c e4 04 0d 0c ee 4c 2d |........|......L-|
|00002190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021d0| 2d 2d 2d 2d 2d 2d 2d 0d | 0c f8 04 0d 0d 02 0b dd |-------.|........|
|000021e0| 20 f2 69 6e 66 6f 0d 0d | 0c 04 0d 0d 16 13 ea 20 | .info..|....... |
|000021f0| 6d 61 73 6b 25 2c 73 63 | 72 6f 6c 6c 25 0d 0d 20 |mask%,sc|roll%.. |
|00002200| 04 0d 0d 2a 1a e7 20 c1 | 91 24 2c 35 2c 36 29 3c |...*.. .|.$,5,6)<|
|00002210| 3e 76 65 72 73 69 6f 6e | 24 20 e1 0d 0d 34 04 0d |>version|$ ...4..|
|00002220| 0d 3e 2d 6d 61 73 6b 25 | 20 3d 20 28 25 31 31 3c |.>-mask%| = (%11<|
|00002230| 3c 34 29 20 2b 20 28 25 | 31 31 3c 3c 31 31 29 20 |<4) + (%|11<<11) |
|00002240| 2b 20 28 25 31 31 31 3c | 3c 31 37 29 0d 0d 48 04 |+ (%111<|<17)..H.|
|00002250| 0d 0d 52 1b f2 6f 70 65 | 6e 5f 77 69 6e 64 6f 77 |..R..ope|n_window|
|00002260| 28 70 72 6f 67 69 6e 66 | 6f 25 29 0d 0d 5c 24 c8 |(proginf|o%)..\$.|
|00002270| 99 20 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 6d 61 |. "Wimp_|Poll",ma|
|00002280| 73 6b 25 2c 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 0d |sk%,wimp|_block%.|
|00002290| 0d 66 04 0d 0d 70 0e f2 | 77 61 69 74 28 32 30 30 |.f...p..|wait(200|
|000022a0| 29 0d 0d 7a 04 0d 0d 84 | 1c 21 77 69 6d 70 5f 62 |)..z....|.!wimp_b|
|000022b0| 6c 6f 63 6b 25 20 3d 20 | 70 72 6f 67 69 6e 66 6f |lock% = |proginfo|
|000022c0| 25 0d 0d 8e 29 c8 99 20 | 22 57 69 6d 70 5f 47 65 |%...).. |"Wimp_Ge|
|000022d0| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 2c 77 |tWindowS|tate",,w|
|000022e0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 0d 0d 98 04 0d 0d |imp_bloc|k%......|
|000022f0| a2 15 e3 20 73 63 72 6f | 6c 6c 25 3d 31 20 b8 20 |... scro|ll%=1 . |
|00002300| 33 30 30 0d 0d ac 1f 20 | 20 77 69 6d 70 5f 62 6c |300.... | wimp_bl|
|00002310| 6f 63 6b 25 21 32 34 20 | 3d 20 2d 73 63 72 6f 6c |ock%!24 |= -scrol|
|00002320| 6c 25 0d 0d b6 27 20 20 | c8 99 20 22 57 69 6d 70 |l%...' |.. "Wimp|
|00002330| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 77 69 |_OpenWin|dow",,wi|
|00002340| 6d 70 5f 62 6c 6f 63 6b | 25 0d 0d c0 29 20 20 c8 |mp_block|%...) .|
|00002350| 99 20 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 6d 61 |. "Wimp_|Poll",ma|
|00002360| 73 6b 25 2c 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 2b |sk%,wimp|_block%+|
|00002370| 33 32 0d 0d ca 05 ed 0d | 0d d4 04 0d 0d de 0f f2 |32......|........|
|00002380| 77 61 69 74 28 31 30 30 | 30 29 0d 0d e8 04 0d 0d |wait(100|0)......|
|00002390| f2 1a e3 20 73 63 72 6f | 6c 6c 25 3d 33 30 30 20 |... scro|ll%=300 |
|000023a0| b8 20 30 20 88 20 2d 31 | 0d 0d fc 1f 20 20 77 69 |. 0 . -1|.... wi|
|000023b0| 6d 70 5f 62 6c 6f 63 6b | 25 21 32 34 20 3d 20 2d |mp_block|%!24 = -|
|000023c0| 73 63 72 6f 6c 6c 25 0d | 0e 06 27 20 20 c8 99 20 |scroll%.|..' .. |
|000023d0| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|000023e0| 22 2c 2c 77 69 6d 70 5f | 62 6c 6f 63 6b 25 0d 0e |",,wimp_|block%..|
|000023f0| 10 29 20 20 c8 99 20 22 | 57 69 6d 70 5f 50 6f 6c |.) .. "|Wimp_Pol|
|00002400| 6c 22 2c 6d 61 73 6b 25 | 2c 77 69 6d 70 5f 62 6c |l",mask%|,wimp_bl|
|00002410| 6f 63 6b 25 2b 33 32 0d | 0e 1a 05 ed 0d 0e 24 04 |ock%+32.|......$.|
|00002420| 0d 0e 2e 0e f2 77 61 69 | 74 28 32 30 30 29 0d 0e |.....wai|t(200)..|
|00002430| 38 04 0d 0e 42 1c f2 63 | 6c 6f 73 65 5f 77 69 6e |8...B..c|lose_win|
|00002440| 64 6f 77 28 70 72 6f 67 | 69 6e 66 6f 25 29 0d 0e |dow(prog|info%)..|
|00002450| 4c 04 0d 0e 56 05 e1 0d | 0e 60 04 0d 0e 6a 4c 2d |L...V...|.`...jL-|
|00002460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002470| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000024a0| 2d 2d 2d 2d 2d 2d 2d 0d | 0e 74 04 0d 0e 7e 12 dd |-------.|.t...~..|
|000024b0| 20 f2 77 61 69 74 28 74 | 69 6d 65 25 29 0d 0e 88 | .wait(t|ime%)...|
|000024c0| 04 0d 0e 92 0e 74 69 6d | 65 25 20 2b 3d 20 91 0d |.....tim|e% += ..|
|000024d0| 0e 9c 04 0d 0e a6 0f f5 | 20 fd 20 91 3e 74 69 6d |........| . .>tim|
|000024e0| 65 25 0d 0e b0 04 0d 0e | ba 05 e1 0d 0e c4 04 0d |e%......|........|
|000024f0| 0e ce 4c 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..L-----|--------|
|00002500| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002510| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0e d8 04 0d |--------|---.....|
|00002540| 0e e2 10 dd 20 f2 70 72 | 6f 67 5f 69 6e 69 74 0d |.... .pr|og_init.|
|00002550| 0e ec 04 0d 0e f6 11 f2 | 61 73 73 65 6d 62 6c 65 |........|assemble|
|00002560| 5f 63 72 63 0d 0f 00 04 | 0d 0f 0a 15 f4 20 4d 61 |_crc....|..... Ma|
|00002570| 69 6e 20 64 61 74 61 20 | 62 6c 6f 63 6b 0d 0f 14 |in data |block...|
|00002580| 24 66 69 6c 65 5f 62 6c | 6f 63 6b 5f 6c 65 6e 67 |$file_bl|ock_leng|
|00002590| 74 68 25 20 3d 20 33 32 | 2a 31 30 32 34 20 2d 20 |th% = 32|*1024 - |
|000025a0| 31 0d 0f 1e 24 de 20 66 | 69 6c 65 5f 62 6c 6f 63 |1...$. f|ile_bloc|
|000025b0| 6b 25 20 66 69 6c 65 5f | 62 6c 6f 63 6b 5f 6c 65 |k% file_|block_le|
|000025c0| 6e 67 74 68 25 0d 0f 28 | 04 0d 0f 32 1d f4 20 49 |ngth%..(|...2.. I|
|000025d0| 6e 69 74 69 61 6c 20 6f | 70 74 69 6f 6e 20 73 65 |nitial o|ption se|
|000025e0| 74 74 69 6e 67 73 0d 0f | 3c 22 64 6f 5f 63 72 6c |ttings..|<"do_crl|
|000025f0| 66 25 20 20 20 20 3d 20 | a3 3a 6f 6e 65 5f 73 68 |f% = |.:one_sh|
|00002600| 6f 74 25 20 20 3d 20 b9 | 0d 0f 46 22 6c 6f 61 64 |ot% = .|..F"load|
|00002610| 5f 62 67 65 74 25 20 20 | 3d 20 a3 3a 6c 6f 61 64 |_bget% |= .:load|
|00002620| 5f 65 78 65 63 25 20 3d | 20 b9 0d 0f 50 22 67 75 |_exec% =| ...P"gu|
|00002630| 65 73 73 5f 74 79 70 65 | 25 20 3d 20 a3 3a 66 61 |ess_type|% = .:fa|
|00002640| 73 74 5f 6c 6f 61 64 25 | 20 3d 20 b9 0d 0f 5a 04 |st_load%| = ...Z.|
|00002650| 0d 0f 64 1d 64 65 66 61 | 75 6c 74 5f 66 69 6c 65 |..d.defa|ult_file|
|00002660| 5f 74 79 70 65 25 20 3d | 20 26 46 46 46 0d 0f 6e |_type% =| &FFF..n|
|00002670| 04 0d 0f 78 11 6f 6c 64 | 5f 74 69 6d 65 25 20 3d |...x.old|_time% =|
|00002680| 20 30 0d 0f 82 04 0d 0f | 8c 10 dd 20 f2 72 65 73 | 0......|... .res|
|00002690| 65 74 5f 61 6c 6c 0d 0f | 96 04 0d 0f a0 32 66 69 |et_all..|.....2fi|
|000026a0| 6c 65 5f 6c 65 6e 67 74 | 68 25 20 3d 20 30 20 20 |le_lengt|h% = 0 |
|000026b0| 20 20 20 3a 66 69 6c 65 | 5f 70 74 72 25 20 20 3d | :file|_ptr% =|
|000026c0| 20 66 69 6c 65 5f 62 6c | 6f 63 6b 25 0d 0f aa 24 | file_bl|ock%...$|
|000026d0| 63 72 6c 66 5f 64 6f 6e | 65 25 20 20 20 3d 20 a3 |crlf_don|e% = .|
|000026e0| 20 3a 6d 6f 64 69 66 69 | 65 64 25 20 20 3d 20 a3 | :modifi|ed% = .|
|000026f0| 0d 0f b4 2d 24 6c 6f 61 | 64 5f 70 74 72 25 20 20 |...-$loa|d_ptr% |
|00002700| 20 3d 20 22 46 46 46 46 | 22 3a 24 65 78 65 63 5f | = "FFFF|":$exec_|
|00002710| 70 74 72 25 20 3d 20 22 | 46 46 46 46 22 0d 0f be |ptr% = "|FFFF"...|
|00002720| 04 0d 0f c8 25 6f 72 69 | 67 69 6e 61 6c 5f 66 69 |....%ori|ginal_fi|
|00002730| 6c 65 5f 6e 61 6d 65 24 | 20 3d 20 22 3c 75 6e 6b |le_name$| = "<unk|
|00002740| 6e 6f 77 6e 3e 22 0d 0f | d2 04 0d 0f dc 12 f2 67 |nown>"..|.......g|
|00002750| 65 74 5f 66 69 6c 65 5f | 74 79 70 65 0d 0f e6 04 |et_file_|type....|
|00002760| 0d 0f f0 12 dd 20 f2 72 | 65 73 65 74 5f 73 74 61 |..... .r|eset_sta|
|00002770| 74 65 0d 0f fa 04 0d 10 | 04 2b f4 20 46 6c 75 73 |te......|.+. Flus|
|00002780| 68 20 62 75 66 66 65 72 | 73 20 61 6e 64 20 65 6e |h buffer|s and en|
|00002790| 61 62 6c 65 20 73 65 72 | 69 61 6c 20 69 6e 70 75 |able ser|ial inpu|
|000027a0| 74 0d 10 0e 09 2a 46 58 | 20 32 0d 10 18 0c 2a 46 |t....*FX| 2....*F|
|000027b0| 58 20 32 31 20 31 0d 10 | 22 0c 2a 46 58 20 32 31 |X 21 1..|".*FX 21|
|000027c0| 20 32 0d 10 2c 0b 2a 46 | 58 20 32 20 32 0d 10 36 | 2..,.*F|X 2 2..6|
|000027d0| 04 0d 10 40 13 f4 20 50 | 6f 69 6e 74 65 72 73 20 |...@.. P|ointers |
|000027e0| 65 74 63 2e 0d 10 4a 2e | 6e 65 77 5f 70 74 72 25 |etc...J.|new_ptr%|
|000027f0| 20 20 20 20 20 3d 20 66 | 69 6c 65 5f 70 74 72 25 | = f|ile_ptr%|
|00002800| 3a 63 72 63 5f 65 72 72 | 6f 72 73 25 20 20 20 3d |:crc_err|ors% =|
|00002810| 20 30 0d 10 54 2e 70 75 | 74 5f 70 74 72 25 20 20 | 0..T.pu|t_ptr% |
|00002820| 20 20 20 3d 20 66 69 6c | 65 5f 70 74 72 25 3a 6e | = fil|e_ptr%:n|
|00002830| 75 6d 5f 62 79 74 65 73 | 25 20 20 20 20 3d 20 30 |um_bytes|% = 0|
|00002840| 0d 10 5e 2e 70 75 74 5f | 65 6e 64 5f 70 74 72 25 |..^.put_|end_ptr%|
|00002850| 20 3d 20 66 69 6c 65 5f | 70 74 72 25 3a 62 6c 6f | = file_|ptr%:blo|
|00002860| 63 6b 5f 6c 65 6e 67 74 | 68 25 20 3d 20 30 0d 10 |ck_lengt|h% = 0..|
|00002870| 5f 14 6c 61 73 74 5f 62 | 75 74 74 6f 6e 25 20 3d |_.last_b|utton% =|
|00002880| 20 30 0d 10 68 04 0d 10 | 72 19 f4 20 53 74 61 74 | 0..h...|r.. Stat|
|00002890| 65 20 6d 61 63 68 69 6e | 65 20 66 6c 61 67 73 0d |e machin|e flags.|
|000028a0| 10 7c 30 70 75 74 74 69 | 6e 67 25 20 20 20 20 20 |.|0putti|ng% |
|000028b0| 20 20 3d 20 a3 3a 73 68 | 61 6b 69 6e 67 25 20 20 | = .:sh|aking% |
|000028c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3d 20 a3 0d | | = ..|
|000028d0| 10 86 30 67 65 74 74 69 | 6e 67 5f 6f 6b 25 20 20 |..0getti|ng_ok% |
|000028e0| 20 20 3d 20 a3 3a 67 65 | 74 74 69 6e 67 5f 66 69 | = .:ge|tting_fi|
|000028f0| 6c 65 5f 6c 65 6e 67 74 | 68 25 20 20 3d 20 a3 0d |le_lengt|h% = ..|
|00002900| 10 90 30 67 65 74 74 69 | 6e 67 5f 65 6e 64 25 20 |..0getti|ng_end% |
|00002910| 20 20 3d 20 a3 3a 67 65 | 74 74 69 6e 67 5f 62 6c | = .:ge|tting_bl|
|00002920| 6f 63 6b 5f 6c 65 6e 67 | 74 68 25 20 3d 20 a3 0d |ock_leng|th% = ..|
|00002930| 10 9a 30 67 65 74 74 69 | 6e 67 5f 62 6c 6f 63 6b |..0getti|ng_block|
|00002940| 25 20 3d 20 a3 3a 67 65 | 74 74 69 6e 67 5f 66 69 |% = .:ge|tting_fi|
|00002950| 6c 65 5f 6e 61 6d 65 25 | 20 20 20 20 3d 20 a3 0d |le_name%| = ..|
|00002960| 10 a4 30 64 6f 77 6e 6c | 6f 61 64 69 6e 67 25 20 |..0downl|oading% |
|00002970| 20 20 3d 20 a3 3a 77 61 | 73 5f 64 6f 77 6e 6c 6f | = .:wa|s_downlo|
|00002980| 61 64 69 6e 67 25 20 20 | 20 20 20 20 3d 20 a3 0d |ading% | = ..|
|00002990| 10 ae 30 75 70 6c 6f 61 | 64 69 6e 67 25 20 20 20 |..0uploa|ding% |
|000029a0| 20 20 3d 20 a3 3a 6c 61 | 73 74 5f 64 6f 77 6e 6c | = .:la|st_downl|
|000029b0| 6f 61 64 25 20 20 20 20 | 20 20 20 20 3d 20 a3 0d |oad% | = ..|
|000029c0| 10 b8 04 0d 10 c2 1f 70 | 6f 6c 6c 5f 6d 61 73 6b |.......p|oll_mask|
|000029d0| 25 20 3d 20 70 6f 6c 6c | 5f 6d 61 73 6b 25 20 84 |% = poll|_mask% .|
|000029e0| 20 31 0d 10 cc 04 0d 10 | d6 1d f2 6d 65 6e 75 5f | 1......|...menu_|
|000029f0| 73 68 61 64 65 28 30 2c | 22 55 70 6c 6f 61 64 22 |shade(0,|"Upload"|
|00002a00| 2c a3 29 0d 10 e0 1f f2 | 6d 65 6e 75 5f 73 68 61 |,.).....|menu_sha|
|00002a10| 64 65 28 30 2c 22 44 6f | 77 6e 6c 6f 61 64 22 2c |de(0,"Do|wnload",|
|00002a20| a3 29 0d 10 ea 04 0d 10 | f4 24 f2 73 65 6c 65 63 |.)......|.$.selec|
|00002a30| 74 5f 69 63 6f 6e 28 73 | 74 61 74 75 73 5f 77 69 |t_icon(s|tatus_wi|
|00002a40| 6e 64 6f 77 25 2c 30 2c | 30 29 0d 10 fe 24 f2 73 |ndow%,0,|0)...$.s|
|00002a50| 65 6c 65 63 74 5f 69 63 | 6f 6e 28 73 74 61 74 75 |elect_ic|on(statu|
|00002a60| 73 5f 77 69 6e 64 6f 77 | 25 2c 31 2c 30 29 0d 11 |s_window|%,1,0)..|
|00002a70| 08 04 0d 11 12 32 e7 20 | 68 6f 75 72 67 6c 61 73 |.....2. |hourglas|
|00002a80| 73 25 20 c8 99 20 22 48 | 6f 75 72 67 6c 61 73 73 |s% .. "H|ourglass|
|00002a90| 5f 4f 66 66 22 3a 68 6f | 75 72 67 6c 61 73 73 25 |_Off":ho|urglass%|
|00002aa0| 20 3d 20 a3 0d 11 1c 04 | 0d 11 26 05 e1 0d 11 30 | = .....|..&....0|
|00002ab0| 04 0d 11 3a 4c 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...:L---|--------|
|00002ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ad0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002af0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 11 44 |--------|-----..D|
|00002b00| 04 0d 11 4e 13 dd 20 f2 | 61 73 73 65 6d 62 6c 65 |...N.. .|assemble|
|00002b10| 5f 63 72 63 0d 11 58 04 | 0d 11 62 3b f4 20 54 68 |_crc..X.|..b;. Th|
|00002b20| 69 73 20 74 61 6b 65 73 | 20 35 2e 33 31 20 6d 73 |is takes| 5.31 ms|
|00002b30| 2c 20 76 73 20 32 2e 32 | 20 73 65 63 20 66 6f 72 |, vs 2.2| sec for|
|00002b40| 20 74 68 65 20 42 61 73 | 69 63 20 76 65 72 73 69 | the Bas|ic versi|
|00002b50| 6f 6e 21 0d 11 6c 04 0d | 11 76 40 ea 20 70 74 72 |on!..l..|.v@. ptr|
|00002b60| 2c 6c 65 6e 67 74 68 2c | 62 69 74 73 2c 63 6f 75 |,length,|bits,cou|
|00002b70| 6e 74 2c 64 61 74 61 2c | 6c 6f 2c 68 69 2c 6c 69 |nt,data,|lo,hi,li|
|00002b80| 6e 6b 2c 6e 62 79 74 2c | 62 79 74 6c 6f 6f 70 2c |nk,nbyt,|bytloop,|
|00002b90| 6f 70 74 25 2c 50 25 0d | 11 80 04 0d 11 8a 0e de |opt%,P%.|........|
|00002ba0| 20 63 72 63 25 20 31 30 | 30 0d 11 94 04 0d 11 9e | crc% 10|0.......|
|00002bb0| 2a 70 74 72 20 20 3d 20 | 30 3a 6c 65 6e 67 74 68 |*ptr = |0:length|
|00002bc0| 20 3d 20 31 3a 62 69 74 | 73 20 3d 20 32 3a 63 6f | = 1:bit|s = 2:co|
|00002bd0| 75 6e 74 20 3d 20 33 0d | 11 a8 2b 64 61 74 61 20 |unt = 3.|..+data |
|00002be0| 3d 20 34 3a 6c 6f 20 20 | 20 20 20 3d 20 35 3a 68 |= 4:lo | = 5:h|
|00002bf0| 69 20 20 20 3d 20 36 3a | 6c 69 6e 6b 20 20 3d 20 |i = 6:|link = |
|00002c00| 31 34 0d 11 b2 04 0d 11 | bc 14 e3 20 6f 70 74 25 |14......|... opt%|
|00002c10| 3d 30 20 b8 20 32 20 88 | 20 32 0d 11 c6 0d 50 25 |=0 . 2 .| 2....P%|
|00002c20| 20 3d 20 63 72 63 25 0d | 11 d0 0d 5b 4f 50 54 20 | = crc%.|...[OPT |
|00002c30| 6f 70 74 25 0d 11 da 1b | 20 20 20 20 20 20 20 20 |opt%....| |
|00002c40| 20 20 4d 4f 56 20 20 20 | 20 20 68 69 2c 23 30 0d | MOV | hi,#0.|
|00002c50| 11 e4 1b 20 20 20 20 20 | 20 20 20 20 20 4d 4f 56 |... | MOV|
|00002c60| 20 20 20 20 20 6c 6f 2c | 23 30 0d 11 ee 1e 20 20 | lo,|#0.... |
|00002c70| 20 20 20 20 20 20 20 20 | 4d 4f 56 20 20 20 20 20 | |MOV |
|00002c80| 63 6f 75 6e 74 2c 23 30 | 0d 11 f8 09 2e 6e 62 79 |count,#0|.....nby|
|00002c90| 74 0d 12 02 26 20 20 20 | 20 20 20 20 20 20 20 4c |t...& | L|
|00002ca0| 44 52 42 20 20 20 20 64 | 61 74 61 2c 5b 70 74 72 |DRB d|ata,[ptr|
|00002cb0| 2c 63 6f 75 6e 74 5d 0d | 12 0c 1e 20 20 20 20 20 |,count].|... |
|00002cc0| 20 20 20 20 20 82 20 20 | 20 20 20 68 69 2c 68 69 | . | hi,hi|
|00002cd0| 2c 64 61 74 61 0d 12 16 | 1d 20 20 20 20 20 20 20 |,data...|. |
|00002ce0| 20 20 20 4d 4f 56 20 20 | 20 20 20 62 69 74 73 2c | MOV | bits,|
|00002cf0| 23 38 0d 12 20 0c 2e 62 | 79 74 6c 6f 6f 70 0d 12 |#8.. ..b|ytloop..|
|00002d00| 2a 1d 20 20 20 20 20 20 | 20 20 20 20 54 53 54 20 |*. | TST |
|00002d10| 20 20 20 20 68 69 2c 23 | 26 38 30 0d 12 34 1c 20 | hi,#|&80..4. |
|00002d20| 20 20 20 20 20 20 20 20 | 20 82 4e 45 20 20 20 68 | | .NE h|
|00002d30| 69 2c 68 69 2c 23 38 0d | 12 3e 1e 20 20 20 20 20 |i,hi,#8.|.>. |
|00002d40| 20 20 20 20 20 82 4e 45 | 20 20 20 6c 6f 2c 6c 6f | .NE| lo,lo|
|00002d50| 2c 23 26 31 30 0d 12 48 | 22 20 20 20 20 20 20 20 |,#&10..H|" |
|00002d60| 20 20 20 4d 4f 56 20 20 | 20 20 20 6c 6f 2c 6c 6f | MOV | lo,lo|
|00002d70| 2c 4c 53 4c 20 23 31 0d | 12 52 1e 20 20 20 20 20 |,LSL #1.|.R. |
|00002d80| 20 20 20 20 20 41 44 44 | 4e 45 20 20 20 6c 6f 2c | ADD|NE lo,|
|00002d90| 6c 6f 2c 23 31 0d 12 5c | 22 20 20 20 20 20 20 20 |lo,#1..\|" |
|00002da0| 20 20 20 4d 4f 56 20 20 | 20 20 20 68 69 2c 68 69 | MOV | hi,hi|
|00002db0| 2c 4c 53 4c 20 23 31 0d | 12 66 1e 20 20 20 20 20 |,LSL #1.|.f. |
|00002dc0| 20 20 20 20 20 54 53 54 | 20 20 20 20 20 6c 6f 2c | TST| lo,|
|00002dd0| 23 26 31 30 30 0d 12 70 | 1e 20 20 20 20 20 20 20 |#&100..p|. |
|00002de0| 20 20 20 41 44 44 4e 45 | 20 20 20 68 69 2c 68 69 | ADDNE| hi,hi|
|00002df0| 2c 23 31 0d 12 7a 22 20 | 20 20 20 20 20 20 20 20 |,#1..z" | |
|00002e00| 20 53 55 42 53 20 20 20 | 20 62 69 74 73 2c 62 69 | SUBS | bits,bi|
|00002e10| 74 73 2c 23 31 0d 12 84 | 1d 20 20 20 20 20 20 20 |ts,#1...|. |
|00002e20| 20 20 20 42 4e 45 20 20 | 20 20 20 62 79 74 6c 6f | BNE | bytlo|
|00002e30| 6f 70 0d 12 8e 04 0d 12 | 98 24 20 20 20 20 20 20 |op......|.$ |
|00002e40| 20 20 20 20 41 44 44 20 | 20 20 20 20 63 6f 75 6e | ADD | coun|
|00002e50| 74 2c 63 6f 75 6e 74 2c | 23 31 0d 12 a2 22 20 20 |t,count,|#1..." |
|00002e60| 20 20 20 20 20 20 20 20 | 43 4d 50 20 20 20 20 20 | |CMP |
|00002e70| 63 6f 75 6e 74 2c 6c 65 | 6e 67 74 68 0d 12 ac 1a |count,le|ngth....|
|00002e80| 20 20 20 20 20 20 20 20 | 20 20 42 4e 45 20 20 20 | | BNE |
|00002e90| 20 20 6e 62 79 74 0d 12 | b6 04 0d 12 c0 1f 20 20 | nbyt..|...... |
|00002ea0| 20 20 20 20 20 20 20 20 | 53 54 52 42 20 20 20 20 | |STRB |
|00002eb0| 6c 6f 2c 63 72 63 5f 6c | 6f 0d 12 ca 1f 20 20 20 |lo,crc_l|o.... |
|00002ec0| 20 20 20 20 20 20 20 53 | 54 52 42 20 20 20 20 68 | S|TRB h|
|00002ed0| 69 2c 63 72 63 5f 68 69 | 0d 12 d4 1d 20 20 20 20 |i,crc_hi|.... |
|00002ee0| 20 20 20 20 20 20 4d 4f | 56 20 20 20 20 20 50 43 | MO|V PC|
|00002ef0| 2c 6c 69 6e 6b 0d 12 de | 04 0d 12 e8 17 2e 63 72 |,link...|......cr|
|00002f00| 63 5f 6c 6f 20 20 20 45 | 51 55 42 20 20 20 20 30 |c_lo E|QUB 0|
|00002f10| 0d 12 f2 17 2e 63 72 63 | 5f 68 69 20 20 20 45 51 |.....crc|_hi EQ|
|00002f20| 55 42 20 20 20 20 30 0d | 12 fc 05 5d 0d 13 06 05 |UB 0.|...]....|
|00002f30| ed 0d 13 10 04 0d 13 1a | 05 e1 0d 13 24 04 0d 13 |........|....$...|
|00002f40| 2e 4c 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.L------|--------|
|00002f50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 13 38 04 0d 13 |--------|--..8...|
|00002f90| 42 14 dd 20 f2 67 65 74 | 5f 66 69 6c 65 5f 74 79 |B.. .get|_file_ty|
|00002fa0| 70 65 0d 13 4c 04 0d 13 | 56 17 ea 20 66 6c 61 67 |pe..L...|V.. flag|
|00002fb0| 73 25 2c 70 74 72 25 2c | 74 65 6d 70 25 0d 13 60 |s%,ptr%,|temp%..`|
|00002fc0| 04 0d 13 6a 19 f4 20 53 | 74 72 69 6e 67 20 2d 3e |...j.. S|tring ->|
|00002fd0| 20 66 69 6c 65 20 74 79 | 70 65 0d 13 74 3a c8 99 | file ty|pe..t:..|
|00002fe0| 20 22 58 4f 53 5f 46 53 | 43 6f 6e 74 72 6f 6c 22 | "XOS_FS|Control"|
|00002ff0| 2c 33 31 2c 24 74 79 70 | 65 5f 70 74 72 25 20 b8 |,31,$typ|e_ptr% .|
|00003000| 20 2c 2c 66 69 6c 65 5f | 74 79 70 65 25 3b 66 6c | ,,file_|type%;fl|
|00003010| 61 67 73 25 0d 13 7e 30 | e7 20 66 6c 61 67 73 25 |ags%..~0|. flags%|
|00003020| 20 80 20 31 20 66 69 6c | 65 5f 74 79 70 65 25 20 | . 1 fil|e_type% |
|00003030| 3d 20 64 65 66 61 75 6c | 74 5f 66 69 6c 65 5f 74 |= defaul|t_file_t|
|00003040| 79 70 65 25 0d 13 88 04 | 0d 13 92 19 f4 20 46 69 |ype%....|..... Fi|
|00003050| 6c 65 20 74 79 70 65 20 | 2d 3e 20 73 74 72 69 6e |le type |-> strin|
|00003060| 67 0d 13 9c 3f c8 99 20 | 22 4f 53 5f 46 53 43 6f |g...?.. |"OS_FSCo|
|00003070| 6e 74 72 6f 6c 22 2c 31 | 38 2c 2c 66 69 6c 65 5f |ntrol",1|8,,file_|
|00003080| 74 79 70 65 25 20 b8 20 | 2c 2c 21 74 79 70 65 5f |type% . |,,!type_|
|00003090| 70 74 72 25 2c 74 79 70 | 65 5f 70 74 72 25 21 34 |ptr%,typ|e_ptr%!4|
|000030a0| 0d 13 a6 15 74 79 70 65 | 5f 70 74 72 25 3f 38 20 |....type|_ptr%?8 |
|000030b0| 3d 20 26 30 44 0d 13 b0 | 16 70 74 72 25 20 3d 20 |= &0D...|.ptr% = |
|000030c0| 74 79 70 65 5f 70 74 72 | 25 2b 37 0d 13 ba 35 c8 |type_ptr|%+7...5.|
|000030d0| 95 20 3f 70 74 72 25 3d | 26 32 30 20 80 20 70 74 |. ?ptr%=|&20 . pt|
|000030e0| 72 25 3e 74 79 70 65 5f | 70 74 72 25 3a 3f 70 74 |r%>type_|ptr%:?pt|
|000030f0| 72 25 3d 26 30 44 3a 70 | 74 72 25 2d 3d 31 3a ce |r%=&0D:p|tr%-=1:.|
|00003100| 0d 13 c4 04 0d 13 ce 27 | e7 20 6c 6f 61 64 5f 65 |.......'|. load_e|
|00003110| 78 65 63 25 20 66 69 6c | 65 5f 74 79 70 65 25 20 |xec% fil|e_type% |
|00003120| 3d 20 26 46 46 46 46 46 | 46 46 46 0d 13 d8 04 0d |= &FFFFF|FFF.....|
|00003130| 13 e2 1e f4 20 52 65 61 | 64 20 6c 6f 61 64 2f 65 |.... Rea|d load/e|
|00003140| 78 65 63 20 61 64 64 72 | 65 73 73 65 73 0d 13 ec |xec addr|esses...|
|00003150| 38 c8 99 20 22 58 4f 53 | 5f 52 65 61 64 55 6e 73 |8.. "XOS|_ReadUns|
|00003160| 69 67 6e 65 64 22 2c 31 | 36 2c 24 6c 6f 61 64 5f |igned",1|6,$load_|
|00003170| 70 74 72 25 20 b8 20 2c | 2c 74 65 6d 70 25 3b 66 |ptr% . ,|,temp%;f|
|00003180| 6c 61 67 73 25 0d 13 f6 | 37 e7 20 66 6c 61 67 73 |lags%...|7. flags|
|00003190| 25 20 80 20 31 20 8c 20 | 24 6c 6f 61 64 5f 70 74 |% . 1 . |$load_pt|
|000031a0| 72 25 20 3d 20 c3 7e 6c | 6f 61 64 25 20 8b 20 6c |r% = .~l|oad% . l|
|000031b0| 6f 61 64 25 20 3d 20 74 | 65 6d 70 25 0d 14 00 04 |oad% = t|emp%....|
|000031c0| 0d 14 0a 38 c8 99 20 22 | 58 4f 53 5f 52 65 61 64 |...8.. "|XOS_Read|
|000031d0| 55 6e 73 69 67 6e 65 64 | 22 2c 31 36 2c 24 65 78 |Unsigned|",16,$ex|
|000031e0| 65 63 5f 70 74 72 25 20 | b8 20 2c 2c 74 65 6d 70 |ec_ptr% |. ,,temp|
|000031f0| 25 3b 66 6c 61 67 73 25 | 0d 14 14 37 e7 20 66 6c |%;flags%|...7. fl|
|00003200| 61 67 73 25 20 80 20 31 | 20 8c 20 24 65 78 65 63 |ags% . 1| . $exec|
|00003210| 5f 70 74 72 25 20 3d 20 | c3 7e 65 78 65 63 25 20 |_ptr% = |.~exec% |
|00003220| 8b 20 65 78 65 63 25 20 | 3d 20 74 65 6d 70 25 0d |. exec% |= temp%.|
|00003230| 14 1e 04 0d 14 28 05 e1 | 0d 14 32 04 0d 14 3c 4c |.....(..|..2...<L|
|00003240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003250| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003260| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003270| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003280| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 14 46 04 0d 14 50 11 |********|..F...P.|
|00003290| 4d 61 69 6e 20 72 6f 75 | 74 69 6e 65 73 0d 14 5a |Main rou|tines..Z|
|000032a0| 04 0d 14 64 4c 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...dL***|********|
|000032b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000032c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000032d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000032e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 14 6e |********|*****..n|
|000032f0| 04 0d 14 78 13 dd 20 f2 | 6e 75 6c 6c 5f 70 75 74 |...x.. .|null_put|
|00003300| 74 69 6e 67 0d 14 82 04 | 0d 14 8c 15 ea 20 74 69 |ting....|..... ti|
|00003310| 6d 65 6f 75 74 25 2c 66 | 6c 61 67 73 25 0d 14 96 |meout%,f|lags%...|
|00003320| 04 0d 14 a0 20 74 69 6d | 65 6f 75 74 25 20 3d 20 |.... tim|eout% = |
|00003330| 91 20 2b 20 32 30 2a 70 | 6f 6c 6c 5f 74 69 6d 65 |. + 20*p|oll_time|
|00003340| 25 0d 14 aa 04 0d 14 b4 | 24 c8 99 20 22 48 6f 75 |%.......|$.. "Hou|
|00003350| 72 67 6c 61 73 73 5f 4f | 6e 22 3a 68 6f 75 72 67 |rglass_O|n":hourg|
|00003360| 6c 61 73 73 25 20 3d 20 | b9 0d 14 be 04 0d 14 c8 |lass% = |........|
|00003370| 05 f5 0d 14 d2 2c 20 20 | c8 99 20 22 4f 53 5f 53 |....., |.. "OS_S|
|00003380| 65 72 69 61 6c 4f 70 22 | 2c 33 2c 3f 70 75 74 5f |erialOp"|,3,?put_|
|00003390| 70 74 72 25 20 b8 20 3b | 66 6c 61 67 73 25 0d 14 |ptr% . ;|flags%..|
|000033a0| dc 24 20 20 e7 20 28 66 | 6c 61 67 73 25 20 80 20 |.$ . (f|lags% . |
|000033b0| 32 29 3d 30 20 70 75 74 | 5f 70 74 72 25 20 2b 3d |2)=0 put|_ptr% +=|
|000033c0| 20 31 0d 14 e6 37 fd 20 | 28 66 6c 61 67 73 25 20 | 1...7. |(flags% |
|000033d0| 80 20 32 29 20 84 20 70 | 75 74 5f 70 74 72 25 3d |. 2) . p|ut_ptr%=|
|000033e0| 70 75 74 5f 65 6e 64 5f | 70 74 72 25 20 84 20 91 |put_end_|ptr% . .|
|000033f0| 3e 74 69 6d 65 6f 75 74 | 25 0d 14 f0 04 0d 14 fa |>timeout|%.......|
|00003400| 25 c8 99 20 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |%.. "Hou|rglass_O|
|00003410| 66 66 22 3a 68 6f 75 72 | 67 6c 61 73 73 25 20 3d |ff":hour|glass% =|
|00003420| 20 a3 0d 15 04 04 0d 15 | 0e 28 e7 20 70 75 74 5f | .......|.(. put_|
|00003430| 70 74 72 25 3d 70 75 74 | 5f 65 6e 64 5f 70 74 72 |ptr%=put|_end_ptr|
|00003440| 25 20 70 75 74 74 69 6e | 67 25 20 3d 20 a3 0d 15 |% puttin|g% = ...|
|00003450| 18 04 0d 15 22 16 e7 20 | ac 20 64 6f 77 6e 6c 6f |....".. |. downlo|
|00003460| 61 64 69 6e 67 25 20 e1 | 0d 15 2c 04 0d 15 36 12 |ading% .|..,...6.|
|00003470| e7 20 ac 20 70 75 74 74 | 69 6e 67 25 20 8c 0d 15 |. . putt|ing% ...|
|00003480| 40 16 20 20 64 6f 77 6e | 6c 6f 61 64 69 6e 67 25 |@. down|loading%|
|00003490| 20 3d 20 a3 0d 15 4a 23 | 20 20 70 6f 6c 6c 5f 6d | = ...J#| poll_m|
|000034a0| 61 73 6b 25 20 20 20 3d | 20 70 6f 6c 6c 5f 6d 61 |ask% =| poll_ma|
|000034b0| 73 6b 25 20 84 20 31 0d | 15 54 1f 20 20 f2 6d 65 |sk% . 1.|.T. .me|
|000034c0| 6e 75 5f 73 68 61 64 65 | 28 30 2c 22 55 70 6c 6f |nu_shade|(0,"Uplo|
|000034d0| 61 64 22 2c a3 29 0d 15 | 5e 05 cd 0d 15 68 04 0d |ad",.)..|^....h..|
|000034e0| 15 72 12 f2 75 70 64 61 | 74 65 5f 73 74 61 74 75 |.r..upda|te_statu|
|000034f0| 73 0d 15 7c 04 0d 15 86 | 05 e1 0d 15 90 04 0d 15 |s..|....|........|
|00003500| 9a 4c 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.L------|--------|
|00003510| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 15 a4 04 0d 15 |--------|--......|
|00003550| ae 14 dd 20 f2 75 70 64 | 61 74 65 5f 73 74 61 74 |... .upd|ate_stat|
|00003560| 75 73 0d 15 b8 04 0d 15 | c2 38 e7 20 64 6f 77 6e |us......|.8. down|
|00003570| 6c 6f 61 64 69 6e 67 25 | 20 84 20 28 77 61 73 5f |loading%| . (was_|
|00003580| 64 6f 77 6e 6c 6f 61 64 | 69 6e 67 25 20 80 20 ac |download|ing% . .|
|00003590| 20 75 70 6c 6f 61 64 69 | 6e 67 25 29 20 8c 0d 15 | uploadi|ng%) ...|
|000035a0| cc 1a 20 20 77 61 73 5f | 64 6f 77 6e 6c 6f 61 64 |.. was_|download|
|000035b0| 69 6e 67 25 20 3d 20 b9 | 0d 15 d6 33 20 20 e7 20 |ing% = .|...3 . |
|000035c0| 64 6f 77 6e 6c 6f 61 64 | 69 6e 67 25 20 84 20 6c |download|ing% . l|
|000035d0| 61 73 74 5f 64 6f 77 6e | 6c 6f 61 64 25 20 6f 6c |ast_down|load% ol|
|000035e0| 64 5f 74 69 6d 65 25 20 | 3d 20 91 0d 15 e0 22 20 |d_time% |= ...." |
|000035f0| 20 e7 20 6f 6c 64 5f 74 | 69 6d 65 25 3c 3d 30 20 | . old_t|ime%<=0 |
|00003600| 6f 6c 64 5f 74 69 6d 65 | 25 20 3d 20 31 0d 15 ea |old_time|% = 1...|
|00003610| 3e 20 20 e7 20 64 6f 77 | 6e 6c 6f 61 64 69 6e 67 |> . dow|nloading|
|00003620| 25 20 8c 20 6c 61 73 74 | 5f 64 6f 77 6e 6c 6f 61 |% . last|_downloa|
|00003630| 64 25 20 3d 20 b9 20 8b | 20 6c 61 73 74 5f 64 6f |d% = . .| last_do|
|00003640| 77 6e 6c 6f 61 64 25 20 | 3d 20 a3 0d 15 f4 46 20 |wnload% |= ....F |
|00003650| 20 c8 99 20 22 4f 53 5f | 43 6f 6e 76 65 72 74 46 | .. "OS_|ConvertF|
|00003660| 69 6c 65 53 69 7a 65 22 | 2c 70 75 74 5f 65 6e 64 |ileSize"|,put_end|
|00003670| 5f 70 74 72 25 2d 66 69 | 6c 65 5f 70 74 72 25 2c |_ptr%-fi|le_ptr%,|
|00003680| 73 74 61 74 75 73 5f 6c | 65 6e 67 74 68 25 2c 31 |status_l|ength%,1|
|00003690| 32 0d 15 fe 2e 20 20 24 | 73 74 61 74 75 73 5f 62 |2.... $|status_b|
|000036a0| 79 74 65 73 25 20 3d 20 | c3 28 70 75 74 5f 70 74 |ytes% = |.(put_pt|
|000036b0| 72 25 20 2d 20 66 69 6c | 65 5f 70 74 72 25 29 0d |r% - fil|e_ptr%).|
|000036c0| 16 08 40 20 20 24 73 74 | 61 74 75 73 5f 72 61 74 |..@ $st|atus_rat|
|000036d0| 65 25 20 20 3d 20 c3 28 | 28 70 75 74 5f 70 74 72 |e% = .(|(put_ptr|
|000036e0| 25 20 2d 20 66 69 6c 65 | 5f 70 74 72 25 29 2a 31 |% - file|_ptr%)*1|
|000036f0| 30 30 20 81 20 6f 6c 64 | 5f 74 69 6d 65 25 29 0d |00 . old|_time%).|
|00003700| 16 12 1a 20 20 24 73 74 | 61 74 75 73 5f 63 72 63 |... $st|atus_crc|
|00003710| 25 20 20 20 3d 20 22 30 | 22 0d 16 1c 05 cc 0d 16 |% = "0|".......|
|00003720| 26 1a 20 20 77 61 73 5f | 64 6f 77 6e 6c 6f 61 64 |&. was_|download|
|00003730| 69 6e 67 25 20 3d 20 a3 | 0d 16 30 20 20 20 e7 20 |ing% = .|..0 . |
|00003740| 75 70 6c 6f 61 64 69 6e | 67 25 20 6f 6c 64 5f 74 |uploadin|g% old_t|
|00003750| 69 6d 65 25 20 3d 20 91 | 0d 16 3a 22 20 20 e7 20 |ime% = .|..:" . |
|00003760| 6f 6c 64 5f 74 69 6d 65 | 25 3c 3d 30 20 6f 6c 64 |old_time|%<=0 old|
|00003770| 5f 74 69 6d 65 25 20 3d | 20 31 0d 16 44 3c 20 20 |_time% =| 1..D< |
|00003780| c8 99 20 22 4f 53 5f 43 | 6f 6e 76 65 72 74 46 69 |.. "OS_C|onvertFi|
|00003790| 6c 65 53 69 7a 65 22 2c | 66 69 6c 65 5f 6c 65 6e |leSize",|file_len|
|000037a0| 67 74 68 25 2c 73 74 61 | 74 75 73 5f 6c 65 6e 67 |gth%,sta|tus_leng|
|000037b0| 74 68 25 2c 31 32 0d 16 | 4e 31 20 20 24 73 74 61 |th%,12..|N1 $sta|
|000037c0| 74 75 73 5f 62 79 74 65 | 73 25 20 3d 20 c3 28 66 |tus_byte|s% = .(f|
|000037d0| 69 6c 65 5f 70 74 72 25 | 20 2d 20 66 69 6c 65 5f |ile_ptr%| - file_|
|000037e0| 62 6c 6f 63 6b 25 29 0d | 16 58 43 20 20 24 73 74 |block%).|.XC $st|
|000037f0| 61 74 75 73 5f 72 61 74 | 65 25 20 20 3d 20 c3 28 |atus_rat|e% = .(|
|00003800| 28 66 69 6c 65 5f 70 74 | 72 25 20 2d 20 66 69 6c |(file_pt|r% - fil|
|00003810| 65 5f 62 6c 6f 63 6b 25 | 29 2a 31 30 30 20 81 20 |e_block%|)*100 . |
|00003820| 6f 6c 64 5f 74 69 6d 65 | 25 29 0d 16 62 25 20 20 |old_time|%)..b% |
|00003830| 24 73 74 61 74 75 73 5f | 63 72 63 25 20 20 20 3d |$status_|crc% =|
|00003840| 20 c3 28 63 72 63 5f 65 | 72 72 6f 72 73 25 29 0d | .(crc_e|rrors%).|
|00003850| 16 6c 05 cd 0d 16 76 04 | 0d 16 80 2e f2 73 65 6c |.l....v.|.....sel|
|00003860| 65 63 74 5f 69 63 6f 6e | 28 73 74 61 74 75 73 5f |ect_icon|(status_|
|00003870| 77 69 6e 64 6f 77 25 2c | 30 2c 2d 75 70 6c 6f 61 |window%,|0,-uploa|
|00003880| 64 69 6e 67 25 29 0d 16 | 8a 30 f2 73 65 6c 65 63 |ding%)..|.0.selec|
|00003890| 74 5f 69 63 6f 6e 28 73 | 74 61 74 75 73 5f 77 69 |t_icon(s|tatus_wi|
|000038a0| 6e 64 6f 77 25 2c 31 2c | 2d 64 6f 77 6e 6c 6f 61 |ndow%,1,|-downloa|
|000038b0| 64 69 6e 67 25 29 0d 16 | 94 22 f2 75 70 64 61 74 |ding%)..|.".updat|
|000038c0| 65 5f 69 63 6f 6e 28 73 | 74 61 74 75 73 5f 77 69 |e_icon(s|tatus_wi|
|000038d0| 6e 64 6f 77 25 2c 32 29 | 0d 16 9e 22 f2 75 70 64 |ndow%,2)|...".upd|
|000038e0| 61 74 65 5f 69 63 6f 6e | 28 73 74 61 74 75 73 5f |ate_icon|(status_|
|000038f0| 77 69 6e 64 6f 77 25 2c | 33 29 0d 16 a8 22 f2 75 |window%,|3)...".u|
|00003900| 70 64 61 74 65 5f 69 63 | 6f 6e 28 73 74 61 74 75 |pdate_ic|on(statu|
|00003910| 73 5f 77 69 6e 64 6f 77 | 25 2c 34 29 0d 16 b2 22 |s_window|%,4)..."|
|00003920| f2 75 70 64 61 74 65 5f | 69 63 6f 6e 28 73 74 61 |.update_|icon(sta|
|00003930| 74 75 73 5f 77 69 6e 64 | 6f 77 25 2c 39 29 0d 16 |tus_wind|ow%,9)..|
|00003940| bc 04 0d 16 c6 05 e1 0d | 16 d0 04 0d 16 da 4c 2d |........|......L-|
|00003950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003960| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003990| 2d 2d 2d 2d 2d 2d 2d 0d | 16 e4 04 0d 16 ee 13 dd |-------.|........|
|000039a0| 20 f2 6e 75 6c 6c 5f 67 | 65 74 74 69 6e 67 0d 16 | .null_g|etting..|
|000039b0| f8 04 0d 17 02 2b ea 20 | 6e 65 77 5f 62 79 74 65 |.....+. |new_byte|
|000039c0| 73 25 2c 74 69 6d 65 6f | 75 74 25 2c 62 79 74 65 |s%,timeo|ut%,byte|
|000039d0| 25 2c 66 6c 61 67 73 25 | 2c 67 6f 74 25 0d 17 0c |%,flags%|,got%...|
|000039e0| 04 0d 17 16 26 c8 99 20 | 22 4f 53 5f 42 79 74 65 |....&.. |"OS_Byte|
|000039f0| 22 2c 26 38 30 2c 26 46 | 45 20 b8 20 2c 6e 65 77 |",&80,&F|E . ,new|
|00003a00| 5f 62 79 74 65 73 25 0d | 17 20 34 e7 20 6e 65 77 |_bytes%.|. 4. new|
|00003a10| 5f 62 79 74 65 73 25 3d | 30 20 80 20 6e 65 77 5f |_bytes%=|0 . new_|
|00003a20| 70 74 72 25 2d 66 69 6c | 65 5f 70 74 72 25 3d 6e |ptr%-fil|e_ptr%=n|
|00003a30| 75 6d 5f 62 79 74 65 73 | 25 20 e1 0d 17 2a 04 0d |um_bytes|% ...*..|
|00003a40| 17 34 1f 74 69 6d 65 6f | 75 74 25 20 3d 20 91 20 |.4.timeo|ut% = . |
|00003a50| 2b 20 32 2a 70 6f 6c 6c | 5f 74 69 6d 65 25 0d 17 |+ 2*poll|_time%..|
|00003a60| 3e 2a e7 20 66 61 73 74 | 5f 6c 6f 61 64 25 20 74 |>*. fast|_load% t|
|00003a70| 69 6d 65 6f 75 74 25 20 | 2b 3d 20 39 38 2a 70 6f |imeout% |+= 98*po|
|00003a80| 6c 6c 5f 74 69 6d 65 25 | 0d 17 48 04 0d 17 52 24 |ll_time%|..H...R$|
|00003a90| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e |.. "Hour|glass_On|
|00003aa0| 22 3a 68 6f 75 72 67 6c | 61 73 73 25 20 3d 20 b9 |":hourgl|ass% = .|
|00003ab0| 0d 17 5c 04 0d 17 66 05 | f5 0d 17 70 28 20 20 c8 |..\...f.|...p( .|
|00003ac0| 99 20 22 4f 53 5f 53 65 | 72 69 61 6c 4f 70 22 2c |. "OS_Se|rialOp",|
|00003ad0| 34 20 b8 20 2c 62 79 74 | 65 25 3b 66 6c 61 67 73 |4 . ,byt|e%;flags|
|00003ae0| 25 0d 17 7a 36 20 20 e7 | 20 28 66 6c 61 67 73 25 |%..z6 .| (flags%|
|00003af0| 20 80 20 32 29 3d 30 20 | 3f 6e 65 77 5f 70 74 72 | . 2)=0 |?new_ptr|
|00003b00| 25 20 3d 20 62 79 74 65 | 25 3a 6e 65 77 5f 70 74 |% = byte|%:new_pt|
|00003b10| 72 25 20 2b 3d 20 31 0d | 17 84 45 20 20 e7 20 6e |r% += 1.|..E . n|
|00003b20| 65 77 5f 70 74 72 25 2d | 66 69 6c 65 5f 62 6c 6f |ew_ptr%-|file_blo|
|00003b30| 63 6b 25 2b 31 30 3e 66 | 69 6c 65 5f 62 6c 6f 63 |ck%+10>f|ile_bloc|
|00003b40| 6b 5f 6c 65 6e 67 74 68 | 25 20 85 20 31 2c 22 44 |k_length|% . 1,"D|
|00003b50| 61 74 61 20 6f 76 65 72 | 72 75 6e 22 0d 17 8e 1f |ata over|run"....|
|00003b60| fd 20 28 66 6c 61 67 73 | 25 20 80 20 32 29 20 84 |. (flags|% . 2) .|
|00003b70| 20 91 3e 74 69 6d 65 6f | 75 74 25 0d 17 98 04 0d | .>timeo|ut%.....|
|00003b80| 17 a2 2b 6e 75 6d 5f 62 | 79 74 65 73 25 20 20 20 |..+num_b|ytes% |
|00003b90| 20 20 3d 20 6e 65 77 5f | 70 74 72 25 20 20 20 2d | = new_|ptr% -|
|00003ba0| 20 66 69 6c 65 5f 70 74 | 72 25 0d 17 ac 2f 6e 75 | file_pt|r%.../nu|
|00003bb0| 6d 5f 63 72 63 5f 62 79 | 74 65 73 25 20 3d 20 6e |m_crc_by|tes% = n|
|00003bc0| 75 6d 5f 62 79 74 65 73 | 25 20 2d 20 62 6c 6f 63 |um_bytes|% - bloc|
|00003bd0| 6b 5f 6c 65 6e 67 74 68 | 25 0d 17 b6 04 0d 17 c0 |k_length|%.......|
|00003be0| 0a c8 8e 20 b9 20 ca 0d | 17 ca 3c 20 20 c9 20 67 |... . ..|..< . g|
|00003bf0| 65 74 74 69 6e 67 5f 6f | 6b 25 20 20 20 20 20 20 |etting_o|k% |
|00003c00| 20 20 20 20 20 80 20 6e | 75 6d 5f 62 79 74 65 73 | . n|um_bytes|
|00003c10| 25 3e 30 20 20 20 20 20 | 3a 67 6f 74 25 20 3d 20 |%>0 |:got% = |
|00003c20| a4 6f 6b 0d 17 d4 3f 20 | 20 c9 20 73 68 61 6b 69 |.ok...? | . shaki|
|00003c30| 6e 67 25 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ng% | |
|00003c40| 20 80 20 6e 75 6d 5f 62 | 79 74 65 73 25 3e 31 20 | . num_b|ytes%>1 |
|00003c50| 20 20 20 20 3a 67 6f 74 | 25 20 3d 20 a4 73 68 61 | :got|% = .sha|
|00003c60| 6b 65 0d 17 de 45 20 20 | c9 20 67 65 74 74 69 6e |ke...E |. gettin|
|00003c70| 67 5f 66 69 6c 65 5f 6c | 65 6e 67 74 68 25 20 20 |g_file_l|ength% |
|00003c80| 80 20 6e 75 6d 5f 62 79 | 74 65 73 25 3e 31 20 20 |. num_by|tes%>1 |
|00003c90| 20 20 20 3a 67 6f 74 25 | 20 3d 20 a4 66 69 6c 65 | :got%| = .file|
|00003ca0| 5f 6c 65 6e 67 74 68 0d | 17 e8 3d 20 20 c9 20 67 |_length.|..= . g|
|00003cb0| 65 74 74 69 6e 67 5f 65 | 6e 64 25 20 20 20 20 20 |etting_e|nd% |
|00003cc0| 20 20 20 20 20 80 20 6e | 75 6d 5f 62 79 74 65 73 | . n|um_bytes|
|00003cd0| 25 3e 30 20 20 20 20 20 | 3a 67 6f 74 25 20 3d 20 |%>0 |:got% = |
|00003ce0| a4 65 6e 64 0d 17 f2 46 | 20 20 c9 20 67 65 74 74 |.end...F| . gett|
|00003cf0| 69 6e 67 5f 62 6c 6f 63 | 6b 5f 6c 65 6e 67 74 68 |ing_bloc|k_length|
|00003d00| 25 20 80 20 6e 75 6d 5f | 62 79 74 65 73 25 3e 32 |% . num_|bytes%>2|
|00003d10| 20 20 20 20 20 3a 67 6f | 74 25 20 3d 20 a4 62 6c | :go|t% = .bl|
|00003d20| 6f 63 6b 5f 6c 65 6e 67 | 74 68 0d 17 fc 3f 20 20 |ock_leng|th...? |
|00003d30| c9 20 67 65 74 74 69 6e | 67 5f 62 6c 6f 63 6b 25 |. gettin|g_block%|
|00003d40| 20 20 20 20 20 20 20 20 | 80 20 6e 75 6d 5f 63 72 | |. num_cr|
|00003d50| 63 5f 62 79 74 65 73 25 | 3e 31 20 3a 67 6f 74 25 |c_bytes%|>1 :got%|
|00003d60| 20 3d 20 a4 62 6c 6f 63 | 6b 0d 18 06 43 20 20 c9 | = .bloc|k...C .|
|00003d70| 20 67 65 74 74 69 6e 67 | 5f 66 69 6c 65 5f 6e 61 | getting|_file_na|
|00003d80| 6d 65 25 20 20 20 20 80 | 20 6e 75 6d 5f 62 79 74 |me% .| num_byt|
|00003d90| 65 73 25 3e 38 20 20 20 | 20 20 3a 67 6f 74 25 20 |es%>8 | :got% |
|00003da0| 3d 20 a4 66 69 6c 65 5f | 6e 61 6d 65 0d 18 10 37 |= .file_|name...7|
|00003db0| 20 20 7f 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00003dc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003dd0| 20 20 20 20 20 20 20 20 | 20 20 3a 67 6f 74 25 20 | | :got% |
|00003de0| 3d 20 30 0d 18 1a 05 cb | 0d 18 24 04 0d 18 2e 20 |= 0.....|..$.... |
|00003df0| e7 20 6e 75 6d 5f 62 79 | 74 65 73 25 3e 67 6f 74 |. num_by|tes%>got|
|00003e00| 25 20 80 20 67 6f 74 25 | 3e 30 20 8c 0d 18 38 38 |% . got%|>0 ...88|
|00003e10| 20 20 e3 20 6e 65 77 5f | 70 74 72 25 3d 66 69 6c | . new_|ptr%=fil|
|00003e20| 65 5f 70 74 72 25 20 b8 | 20 66 69 6c 65 5f 70 74 |e_ptr% .| file_pt|
|00003e30| 72 25 2b 6e 75 6d 5f 62 | 79 74 65 73 25 2d 67 6f |r%+num_b|ytes%-go|
|00003e40| 74 25 2d 31 0d 18 42 21 | 20 20 20 20 3f 6e 65 77 |t%-1..B!| ?new|
|00003e50| 5f 70 74 72 25 20 3d 20 | 6e 65 77 5f 70 74 72 25 |_ptr% = |new_ptr%|
|00003e60| 3f 67 6f 74 25 0d 18 4c | 07 20 20 ed 0d 18 56 05 |?got%..L|. ...V.|
|00003e70| cd 0d 18 60 2c 6e 65 77 | 5f 70 74 72 25 20 3d 20 |...`,new|_ptr% = |
|00003e80| 66 69 6c 65 5f 70 74 72 | 25 20 2b 20 6e 75 6d 5f |file_ptr|% + num_|
|00003e90| 62 79 74 65 73 25 20 2d | 20 67 6f 74 25 0d 18 6a |bytes% -| got%..j|
|00003ea0| 04 0d 18 74 25 c8 99 20 | 22 48 6f 75 72 67 6c 61 |...t%.. |"Hourgla|
|00003eb0| 73 73 5f 4f 66 66 22 3a | 68 6f 75 72 67 6c 61 73 |ss_Off":|hourglas|
|00003ec0| 73 25 20 3d 20 a3 0d 18 | 7e 04 0d 18 88 05 e1 0d |s% = ...|~.......|
|00003ed0| 18 92 04 0d 18 9c 4c 2d | 2d 2d 2d 2d 2d 2d 2d 2d |......L-|--------|
|00003ee0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00003f20| 18 a6 04 0d 18 b0 0c dd | 20 a4 73 68 61 6b 65 0d |........| .shake.|
|00003f30| 18 ba 04 0d 18 c4 08 ea | 20 69 25 0d 18 ce 04 0d |........| i%.....|
|00003f40| 18 d8 30 e7 20 3f 66 69 | 6c 65 5f 70 74 72 25 3c |..0. ?fi|le_ptr%<|
|00003f50| 3e 97 28 22 53 22 29 20 | 84 20 66 69 6c 65 5f 70 |>.("S") |. file_p|
|00003f60| 74 72 25 3f 31 3c 3e 97 | 28 22 42 22 29 20 8c 0d |tr%?1<>.|("B") ..|
|00003f70| 18 e2 37 20 20 70 75 74 | 5f 70 74 72 25 20 20 3d |..7 put|_ptr% =|
|00003f80| 20 66 69 6c 65 5f 70 74 | 72 25 3a 70 75 74 5f 65 | file_pt|r%:put_e|
|00003f90| 6e 64 5f 70 74 72 25 20 | 3d 20 70 75 74 5f 70 74 |nd_ptr% |= put_pt|
|00003fa0| 72 25 20 2b 20 31 0d 18 | ec 18 20 20 3f 70 75 74 |r% + 1..|.. ?put|
|00003fb0| 5f 70 74 72 25 20 3d 20 | 97 28 22 78 22 29 0d 18 |_ptr% = |.("x")..|
|00003fc0| f6 13 20 20 70 75 74 74 | 69 6e 67 25 20 20 3d 20 |.. putt|ing% = |
|00003fd0| b9 0d 19 00 12 20 20 3d | 20 6e 75 6d 5f 62 79 74 |..... =| num_byt|
|00003fe0| 65 73 25 0d 19 0a 05 cd | 0d 19 14 04 0d 19 1e 1d |es%.....|........|
|00003ff0| 70 75 74 5f 70 74 72 25 | 20 20 20 3d 20 6e 65 77 |put_ptr%| = new|
|00004000| 5f 70 74 72 25 20 2d 20 | 32 0d 19 28 2b 3f 70 75 |_ptr% - |2..(+?pu|
|00004010| 74 5f 70 74 72 25 20 20 | 3d 20 97 28 22 73 22 29 |t_ptr% |= .("s")|
|00004020| 3a 70 75 74 5f 70 74 72 | 25 3f 31 20 3d 20 97 28 |:put_ptr|%?1 = .(|
|00004030| 22 62 22 29 0d 19 32 04 | 0d 19 3c 15 e7 20 24 6e |"b")..2.|..<.. $n|
|00004040| 61 6d 65 5f 70 74 72 25 | 3d 22 22 20 8c 0d 19 46 |ame_ptr%|="" ...F|
|00004050| 38 20 20 e7 20 6c 6f 61 | 64 5f 62 67 65 74 25 20 |8 . loa|d_bget% |
|00004060| 8c 20 70 75 74 5f 70 74 | 72 25 3f 32 20 3d 20 26 |. put_pt|r%?2 = &|
|00004070| 30 33 20 8b 20 70 75 74 | 5f 70 74 72 25 3f 32 20 |03 . put|_ptr%?2 |
|00004080| 3d 20 26 30 43 0d 19 50 | 21 20 20 70 75 74 5f 65 |= &0C..P|! put_e|
|00004090| 6e 64 5f 70 74 72 25 20 | 3d 20 70 75 74 5f 70 74 |nd_ptr% |= put_pt|
|000040a0| 72 25 20 2b 20 33 0d 19 | 5a 2f 20 20 73 68 61 6b |r% + 3..|Z/ shak|
|000040b0| 69 6e 67 25 20 20 20 20 | 20 3d 20 a3 3a 70 75 74 |ing% | = .:put|
|000040c0| 74 69 6e 67 25 20 20 20 | 20 20 20 20 20 20 20 20 |ting% | |
|000040d0| 20 20 3d 20 b9 0d 19 64 | 30 20 20 67 65 74 74 69 | = ...d|0 getti|
|000040e0| 6e 67 5f 6f 6b 25 20 20 | 3d 20 b9 20 3a 67 65 74 |ng_ok% |= . :get|
|000040f0| 74 69 6e 67 5f 66 69 6c | 65 5f 6c 65 6e 67 74 68 |ting_fil|e_length|
|00004100| 25 20 3d 20 b9 0d 19 6e | 05 cc 0d 19 78 18 20 20 |% = ...n|....x. |
|00004110| 70 75 74 5f 70 74 72 25 | 3f 32 20 20 20 3d 20 26 |put_ptr%|?2 = &|
|00004120| 33 30 0d 19 82 3d 20 20 | e3 20 69 25 3d 30 20 b8 |30...= |. i%=0 .|
|00004130| 20 a9 28 24 6e 61 6d 65 | 5f 70 74 72 25 29 3a 70 | .($name|_ptr%):p|
|00004140| 75 74 5f 70 74 72 25 3f | 28 69 25 2b 33 29 20 3d |ut_ptr%?|(i%+3) =|
|00004150| 20 6e 61 6d 65 5f 70 74 | 72 25 3f 69 25 3a ed 0d | name_pt|r%?i%:..|
|00004160| 19 8c 31 20 20 70 75 74 | 5f 65 6e 64 5f 70 74 72 |..1 put|_end_ptr|
|00004170| 25 20 3d 20 70 75 74 5f | 70 74 72 25 20 2b 20 34 |% = put_|ptr% + 4|
|00004180| 20 2b 20 a9 28 24 6e 61 | 6d 65 5f 70 74 72 25 29 | + .($na|me_ptr%)|
|00004190| 0d 19 96 17 20 20 24 6e | 61 6d 65 5f 70 74 72 25 |.... $n|ame_ptr%|
|000041a0| 20 20 20 3d 20 22 22 0d | 19 a0 26 20 20 70 75 74 | = "".|..& put|
|000041b0| 74 69 6e 67 25 20 20 20 | 20 20 3d 20 b9 3a 67 65 |ting% | = .:ge|
|000041c0| 74 74 69 6e 67 5f 6f 6b | 25 20 3d 20 b9 0d 19 aa |tting_ok|% = ....|
|000041d0| 05 cd 0d 19 b4 04 0d 19 | be 07 3d 20 32 0d 19 c8 |........|..= 2...|
|000041e0| 04 0d 19 d2 4c 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....L---|--------|
|000041f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 19 dc |--------|-----...|
|00004230| 04 0d 19 e6 09 dd 20 a4 | 6f 6b 0d 19 f0 04 0d 19 |...... .|ok......|
|00004240| fa 13 67 65 74 74 69 6e | 67 5f 6f 6b 25 20 3d 20 |..gettin|g_ok% = |
|00004250| a3 0d 1a 04 04 0d 1a 0e | 1b e7 20 a4 62 69 74 73 |........|.. .bits|
|00004260| 28 3f 66 69 6c 65 5f 70 | 74 72 25 29 3c 36 20 8c |(?file_p|tr%)<6 .|
|00004270| 0d 1a 18 36 20 20 f2 6d | 65 73 73 61 67 65 28 22 |...6 .m|essage("|
|00004280| 50 72 6f 74 6f 63 6f 6c | 20 65 72 72 6f 72 20 2d |Protocol| error -|
|00004290| 20 74 72 61 6e 73 6d 69 | 73 73 69 6f 6e 20 66 61 | transmi|ssion fa|
|000042a0| 69 6c 65 64 22 29 0d 1a | 2c 10 20 20 f2 72 65 73 |iled")..|,. .res|
|000042b0| 65 74 5f 61 6c 6c 0d 1a | 40 09 20 20 3d 20 30 0d |et_all..|@. = 0.|
|000042c0| 1a 41 05 cd 0d 1a 4a 04 | 0d 1a 54 2d e7 20 6c 61 |.A....J.|..T-. la|
|000042d0| 73 74 5f 62 75 74 74 6f | 6e 25 3d 34 20 80 20 67 |st_butto|n%=4 . g|
|000042e0| 65 74 74 69 6e 67 5f 66 | 69 6c 65 5f 6c 65 6e 67 |etting_f|ile_leng|
|000042f0| 74 68 25 20 8c 0d 1a 68 | 2d 20 20 f2 6d 65 73 73 |th% ...h|- .mess|
|00004300| 61 67 65 28 22 50 72 65 | 73 73 20 70 6c 61 79 20 |age("Pre|ss play |
|00004310| 6f 6e 20 74 61 70 65 20 | 72 65 63 6f 72 64 65 72 |on tape |recorder|
|00004320| 22 29 0d 1a 72 16 20 20 | 6c 61 73 74 5f 62 75 74 |")..r. |last_but|
|00004330| 74 6f 6e 25 20 3d 20 30 | 0d 1a 7c 05 cd 0d 1a 7d |ton% = 0|..|....}|
|00004340| 04 0d 1a 86 07 3d 20 31 | 0d 1a a4 04 0d 1a ae 4c |.....= 1|.......L|
|00004350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004370| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004390| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 1a b8 04 0d 1a c2 12 |--------|........|
|000043a0| dd 20 a4 66 69 6c 65 5f | 6c 65 6e 67 74 68 0d 1a |. .file_|length..|
|000043b0| cc 04 0d 1a d6 2f 66 69 | 6c 65 5f 6c 65 6e 67 74 |...../fi|le_lengt|
|000043c0| 68 25 20 3d 20 3f 66 69 | 6c 65 5f 70 74 72 25 20 |h% = ?fi|le_ptr% |
|000043d0| 2b 20 32 35 36 2a 66 69 | 6c 65 5f 70 74 72 25 3f |+ 256*fi|le_ptr%?|
|000043e0| 31 0d 1a e0 04 0d 1a ea | 1c 67 65 74 74 69 6e 67 |1.......|.getting|
|000043f0| 5f 66 69 6c 65 5f 6c 65 | 6e 67 74 68 25 20 3d 20 |_file_le|ngth% = |
|00004400| a3 0d 1a f4 1c 67 65 74 | 74 69 6e 67 5f 65 6e 64 |.....get|ting_end|
|00004410| 25 20 20 20 20 20 20 20 | 20 20 3d 20 b9 0d 1a fe |% | = ....|
|00004420| 04 0d 1b 08 09 d1 20 3d | 20 30 0d 1b 12 04 0d 1b |...... =| 0......|
|00004430| 1c 07 3d 20 32 0d 1b 26 | 04 0d 1b 30 4c 2d 2d 2d |..= 2..&|...0L---|
|00004440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004470| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004480| 2d 2d 2d 2d 2d 0d 1b 3a | 04 0d 1b 44 0a dd 20 a4 |-----..:|...D.. .|
|00004490| 65 6e 64 0d 1b 4e 04 0d | 1b 58 12 f2 75 70 64 61 |end..N..|.X..upda|
|000044a0| 74 65 5f 73 74 61 74 75 | 73 0d 1b 62 04 0d 1b 6c |te_statu|s..b...l|
|000044b0| 1b e7 20 a4 62 69 74 73 | 28 3f 66 69 6c 65 5f 70 |.. .bits|(?file_p|
|000044c0| 74 72 25 29 3c 36 20 8c | 0d 1b 76 1c 20 20 6d 6f |tr%)<6 .|..v. mo|
|000044d0| 64 69 66 69 65 64 25 20 | 20 20 20 20 20 20 20 20 |dified% | |
|000044e0| 20 3d 20 b9 0d 1b 80 1c | 20 20 67 65 74 74 69 6e | = .....| gettin|
|000044f0| 67 5f 66 69 6c 65 5f 6e | 61 6d 65 25 20 3d 20 b9 |g_file_n|ame% = .|
|00004500| 0d 1b 8a 19 20 20 e7 20 | 64 6f 5f 63 72 6c 66 25 |.... . |do_crlf%|
|00004510| 20 f2 64 6f 5f 63 72 6c | 66 0d 1b 94 18 20 20 f2 | .do_crl|f.... .|
|00004520| 72 65 70 6f 72 74 5f 63 | 6f 6d 70 6c 65 74 69 6f |report_c|ompletio|
|00004530| 6e 0d 1b 9e 05 cc 0d 1b | a8 1f 20 20 67 65 74 74 |n.......|.. gett|
|00004540| 69 6e 67 5f 62 6c 6f 63 | 6b 5f 6c 65 6e 67 74 68 |ing_bloc|k_length|
|00004550| 25 20 3d 20 b9 0d 1b b2 | 05 cd 0d 1b bc 04 0d 1b |% = ....|........|
|00004560| c6 14 67 65 74 74 69 6e | 67 5f 65 6e 64 25 20 3d |..gettin|g_end% =|
|00004570| 20 a3 0d 1b d0 04 0d 1b | da 07 3d 20 31 0d 1b e4 | .......|..= 1...|
|00004580| 04 0d 1b ee 4c 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....L---|--------|
|00004590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 1b f8 |--------|-----...|
|000045d0| 04 0d 1c 02 18 dd 20 f2 | 72 65 70 6f 72 74 5f 63 |...... .|report_c|
|000045e0| 6f 6d 70 6c 65 74 69 6f | 6e 0d 1c 0c 04 0d 1c 16 |ompletio|n.......|
|000045f0| 0d ea 20 72 65 70 6f 72 | 74 24 0d 1c 20 04 0d 1c |.. repor|t$.. ...|
|00004600| 2a 2e e7 20 6f 6e 65 5f | 73 68 6f 74 25 20 72 65 |*.. one_|shot% re|
|00004610| 70 6f 72 74 24 20 3d 20 | 22 54 72 61 6e 73 66 65 |port$ = |"Transfe|
|00004620| 72 20 63 6f 6d 70 6c 65 | 74 65 64 22 0d 1c 34 04 |r comple|ted"..4.|
|00004630| 0d 1c 3e 15 e7 20 63 72 | 63 5f 65 72 72 6f 72 73 |..>.. cr|c_errors|
|00004640| 25 3e 30 20 8c 0d 1c 48 | 27 20 20 e7 20 72 65 70 |%>0 ...H|' . rep|
|00004650| 6f 72 74 24 3c 3e 22 22 | 20 72 65 70 6f 72 74 24 |ort$<>""| report$|
|00004660| 20 2b 3d 20 22 20 77 69 | 74 68 20 22 0d 1c 52 3b | += " wi|th "..R;|
|00004670| 20 20 72 65 70 6f 72 74 | 24 20 2b 3d 20 c3 28 63 | report|$ += .(c|
|00004680| 72 63 5f 65 72 72 6f 72 | 73 25 29 20 2b 20 22 20 |rc_error|s%) + " |
|00004690| 43 52 43 20 65 72 72 6f | 72 73 20 64 75 72 69 6e |CRC erro|rs durin|
|000046a0| 67 20 6c 6f 61 64 22 0d | 1c 5c 15 20 20 6f 6e 65 |g load".|.\. one|
|000046b0| 5f 73 68 6f 74 25 20 20 | 20 3d 20 b9 0d 1c 66 15 |_shot% | = ...f.|
|000046c0| 20 20 63 72 63 5f 65 72 | 72 6f 72 73 25 20 3d 20 | crc_er|rors% = |
|000046d0| 30 0d 1c 70 05 cd 0d 1c | 7a 04 0d 1c 84 2b e7 20 |0..p....|z....+. |
|000046e0| 66 69 6c 65 5f 70 74 72 | 25 2d 66 69 6c 65 5f 62 |file_ptr|%-file_b|
|000046f0| 6c 6f 63 6b 25 3c 3e 66 | 69 6c 65 5f 6c 65 6e 67 |lock%<>f|ile_leng|
|00004700| 74 68 25 20 8c 0d 1c 8e | 3d 20 20 e7 20 72 65 70 |th% ....|= . rep|
|00004710| 6f 72 74 24 3c 3e 22 22 | 20 8c 20 72 65 70 6f 72 |ort$<>""| . repor|
|00004720| 74 24 20 2b 3d 20 22 3b | 20 64 61 74 61 22 20 8b |t$ += ";| data" .|
|00004730| 20 72 65 70 6f 72 74 24 | 20 2b 3d 20 22 44 61 74 | report$| += "Dat|
|00004740| 61 22 0d 1c 98 26 20 20 | 72 65 70 6f 72 74 24 20 |a"...& |report$ |
|00004750| 2b 3d 20 22 20 6d 61 79 | 20 68 61 76 65 20 62 65 |+= " may| have be|
|00004760| 65 6e 20 6c 6f 73 74 22 | 0d 1c a2 13 20 20 6f 6e |en lost"|.... on|
|00004770| 65 5f 73 68 6f 74 25 20 | 3d 20 b9 0d 1c ac 05 cd |e_shot% |= ......|
|00004780| 0d 1c b6 04 0d 1c c0 23 | e7 20 72 65 70 6f 72 74 |.......#|. report|
|00004790| 24 3c 3e 22 22 20 f2 6d | 65 73 73 61 67 65 28 72 |$<>"" .m|essage(r|
|000047a0| 65 70 6f 72 74 24 29 0d | 1c ca 04 0d 1c d4 05 e1 |eport$).|........|
|000047b0| 0d 1c de 04 0d 1c e8 4c | 2d 2d 2d 2d 2d 2d 2d 2d |.......L|--------|
|000047c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000047d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000047e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000047f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004800| 0d 1c f2 04 0d 1c fc 13 | dd 20 a4 62 6c 6f 63 6b |........|. .block|
|00004810| 5f 6c 65 6e 67 74 68 0d | 1d 06 04 0d 1d 10 3d 62 |_length.|......=b|
|00004820| 6c 6f 63 6b 5f 6c 65 6e | 67 74 68 25 20 3d 20 a4 |lock_len|gth% = .|
|00004830| 76 6f 74 65 28 3f 66 69 | 6c 65 5f 70 74 72 25 2c |vote(?fi|le_ptr%,|
|00004840| 66 69 6c 65 5f 70 74 72 | 25 3f 31 2c 66 69 6c 65 |file_ptr|%?1,file|
|00004850| 5f 70 74 72 25 3f 32 29 | 0d 1d 1a 2b e7 20 62 6c |_ptr%?2)|...+. bl|
|00004860| 6f 63 6b 5f 6c 65 6e 67 | 74 68 25 3c 30 20 62 6c |ock_leng|th%<0 bl|
|00004870| 6f 63 6b 5f 6c 65 6e 67 | 74 68 25 20 3d 20 30 3a |ock_leng|th% = 0:|
|00004880| 3d 20 30 0d 1d 24 29 e7 | 20 62 6c 6f 63 6b 5f 6c |= 0..$).| block_l|
|00004890| 65 6e 67 74 68 25 3d 30 | 20 62 6c 6f 63 6b 5f 6c |ength%=0| block_l|
|000048a0| 65 6e 67 74 68 25 20 3d | 20 32 35 36 0d 1d 2e 04 |ength% =| 256....|
|000048b0| 0d 1d 38 1d 67 65 74 74 | 69 6e 67 5f 62 6c 6f 63 |..8.gett|ing_bloc|
|000048c0| 6b 5f 6c 65 6e 67 74 68 | 25 20 3d 20 a3 0d 1d 42 |k_length|% = ...B|
|000048d0| 1d 67 65 74 74 69 6e 67 | 5f 62 6c 6f 63 6b 25 20 |.getting|_block% |
|000048e0| 20 20 20 20 20 20 20 3d | 20 b9 0d 1d 4c 04 0d 1d | =| ...L...|
|000048f0| 56 07 3d 20 33 0d 1d 60 | 04 0d 1d 6a 4c 2d 2d 2d |V.= 3..`|...jL---|
|00004900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004930| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004940| 2d 2d 2d 2d 2d 0d 1d 74 | 04 0d 1d 7e 18 dd 20 a4 |-----..t|...~.. .|
|00004950| 76 6f 74 65 28 6c 31 25 | 2c 6c 32 25 2c 6c 33 25 |vote(l1%|,l2%,l3%|
|00004960| 29 0d 1d 88 04 0d 1d 92 | 1d e7 20 6c 31 25 3d 6c |).......|.. l1%=l|
|00004970| 32 25 20 80 20 6c 31 25 | 3d 6c 33 25 20 3d 20 6c |2% . l1%|=l3% = l|
|00004980| 31 25 0d 1d 9c 04 0d 1d | a6 25 e7 20 6c 31 25 3d |1%......|.%. l1%=|
|00004990| 6c 32 25 20 63 72 63 5f | 65 72 72 6f 72 73 25 20 |l2% crc_|errors% |
|000049a0| 2b 3d 20 31 3a 20 3d 20 | 6c 31 25 0d 1d b0 25 e7 |+= 1: = |l1%...%.|
|000049b0| 20 6c 31 25 3d 6c 33 25 | 20 63 72 63 5f 65 72 72 | l1%=l3%| crc_err|
|000049c0| 6f 72 73 25 20 2b 3d 20 | 31 3a 20 3d 20 6c 31 25 |ors% += |1: = l1%|
|000049d0| 0d 1d ba 25 e7 20 6c 32 | 25 3d 6c 33 25 20 63 72 |...%. l2|%=l3% cr|
|000049e0| 63 5f 65 72 72 6f 72 73 | 25 20 2b 3d 20 31 3a 20 |c_errors|% += 1: |
|000049f0| 3d 20 6c 32 25 0d 1d c4 | 04 0d 1d ce 37 e7 20 a4 |= l2%...|....7. .|
|00004a00| 63 6f 6e 66 69 72 6d 28 | 22 53 65 72 69 6f 75 73 |confirm(|"Serious|
|00004a10| 20 70 72 6f 74 6f 63 6f | 6c 20 65 72 72 6f 72 3b | protoco|l error;|
|00004a20| 20 63 6f 6e 74 69 6e 75 | 65 3f 22 29 20 3d 20 30 | continu|e?") = 0|
|00004a30| 0d 1d d8 04 0d 1d e2 10 | f2 72 65 73 65 74 5f 73 |........|.reset_s|
|00004a40| 74 61 74 65 0d 1d ec 04 | 0d 1d f6 25 6f 72 69 67 |tate....|...%orig|
|00004a50| 69 6e 61 6c 5f 66 69 6c | 65 5f 6e 61 6d 65 24 20 |inal_fil|e_name$ |
|00004a60| 3d 20 22 3c 63 6f 72 72 | 75 70 74 3e 22 0d 1e 00 |= "<corr|upt>"...|
|00004a70| 04 0d 1e 0a 08 3d 20 2d | 31 0d 1e 14 04 0d 1e 1e |.....= -|1.......|
|00004a80| 4c 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |L-------|--------|
|00004a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 1e 28 04 0d 1e 32 |--------|-..(...2|
|00004ad0| 0c dd 20 a4 62 6c 6f 63 | 6b 0d 1e 3c 04 0d 1e 46 |.. .bloc|k..<...F|
|00004ae0| 14 ea 20 41 25 2c 42 25 | 2c 63 72 63 5f 70 74 72 |.. A%,B%|,crc_ptr|
|00004af0| 25 0d 1e 50 04 0d 1e 5a | 12 41 25 20 3d 20 66 69 |%..P...Z|.A% = fi|
|00004b00| 6c 65 5f 70 74 72 25 0d | 1e 64 16 42 25 20 3d 20 |le_ptr%.|.d.B% = |
|00004b10| 62 6c 6f 63 6b 5f 6c 65 | 6e 67 74 68 25 0d 1e 6e |block_le|ngth%..n|
|00004b20| 0a d6 20 63 72 63 25 0d | 1e 78 04 0d 1e 82 28 63 |.. crc%.|.x....(c|
|00004b30| 72 63 5f 70 74 72 25 20 | 3d 20 66 69 6c 65 5f 70 |rc_ptr% |= file_p|
|00004b40| 74 72 25 20 2b 20 62 6c | 6f 63 6b 5f 6c 65 6e 67 |tr% + bl|ock_leng|
|00004b50| 74 68 25 0d 1e 8c 04 0d | 1e 96 2e e7 20 3f 63 72 |th%.....|.... ?cr|
|00004b60| 63 5f 70 74 72 25 3d 3f | 63 72 63 5f 68 69 20 80 |c_ptr%=?|crc_hi .|
|00004b70| 20 63 72 63 5f 70 74 72 | 25 3f 31 3d 3f 63 72 63 | crc_ptr|%?1=?crc|
|00004b80| 5f 6c 6f 20 8c 0d 1e a0 | 22 20 20 66 69 6c 65 5f |_lo ....|" file_|
|00004b90| 70 74 72 25 20 20 20 2b | 3d 20 62 6c 6f 63 6b 5f |ptr% +|= block_|
|00004ba0| 6c 65 6e 67 74 68 25 0d | 1e aa 1e 20 20 70 75 74 |length%.|... put|
|00004bb0| 5f 70 74 72 25 20 20 20 | 20 20 3d 20 66 69 6c 65 |_ptr% | = file|
|00004bc0| 5f 70 74 72 25 0d 1e b4 | 18 20 20 3f 70 75 74 5f |_ptr%...|. ?put_|
|00004bd0| 70 74 72 25 20 20 20 20 | 3d 20 32 35 35 0d 1e be |ptr% |= 255...|
|00004be0| 05 cc 0d 1e c8 1e 20 20 | 70 75 74 5f 70 74 72 25 |...... |put_ptr%|
|00004bf0| 20 20 20 20 20 3d 20 66 | 69 6c 65 5f 70 74 72 25 | = f|ile_ptr%|
|00004c00| 0d 1e d2 16 20 20 3f 70 | 75 74 5f 70 74 72 25 20 |.... ?p|ut_ptr% |
|00004c10| 20 20 20 3d 20 30 0d 1e | dc 16 20 20 63 72 63 5f | = 0..|.. crc_|
|00004c20| 65 72 72 6f 72 73 25 20 | 2b 3d 20 31 0d 1e e6 05 |errors% |+= 1....|
|00004c30| cd 0d 1e f0 04 0d 1e fa | 21 70 75 74 5f 65 6e 64 |........|!put_end|
|00004c40| 5f 70 74 72 25 20 20 20 | 3d 20 70 75 74 5f 70 74 |_ptr% |= put_pt|
|00004c50| 72 25 20 2b 20 31 0d 1f | 04 16 67 65 74 74 69 6e |r% + 1..|..gettin|
|00004c60| 67 5f 62 6c 6f 63 6b 25 | 20 3d 20 a3 0d 1f 0e 16 |g_block%| = .....|
|00004c70| 70 75 74 74 69 6e 67 25 | 20 20 20 20 20 20 20 3d |putting%| =|
|00004c80| 20 b9 0d 1f 18 16 67 65 | 74 74 69 6e 67 5f 65 6e | .....ge|tting_en|
|00004c90| 64 25 20 20 20 3d 20 b9 | 0d 1f 22 04 0d 1f 2c 10 |d% = .|.."...,.|
|00004ca0| 3d 20 6e 75 6d 5f 62 79 | 74 65 73 25 0d 1f 36 04 |= num_by|tes%..6.|
|00004cb0| 0d 1f 40 4c 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..@L----|--------|
|00004cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 1f 4a 04 |--------|----..J.|
|00004d00| 0d 1f 54 10 dd 20 a4 66 | 69 6c 65 5f 6e 61 6d 65 |..T.. .f|ile_name|
|00004d10| 0d 1f 5e 04 0d 1f 68 0d | ea 20 66 6e 5f 70 74 72 |..^...h.|. fn_ptr|
|00004d20| 25 0d 1f 72 04 0d 1f 7c | 1b 66 6e 5f 70 74 72 25 |%..r...||.fn_ptr%|
|00004d30| 20 3d 20 66 69 6c 65 5f | 70 74 72 25 20 2b 20 37 | = file_|ptr% + 7|
|00004d40| 0d 1f 86 36 f5 20 66 6e | 5f 70 74 72 25 20 2b 3d |...6. fn|_ptr% +=|
|00004d50| 20 31 3a fd 20 3f 66 6e | 5f 70 74 72 25 3d 26 30 | 1:. ?fn|_ptr%=&0|
|00004d60| 44 20 84 20 66 6e 5f 70 | 74 72 25 3d 6e 65 77 5f |D . fn_p|tr%=new_|
|00004d70| 70 74 72 25 2d 31 0d 1f | 90 17 e7 20 3f 66 6e 5f |ptr%-1..|... ?fn_|
|00004d80| 70 74 72 25 3c 3e 26 30 | 44 20 3d 20 30 0d 1f 9a |ptr%<>&0|D = 0...|
|00004d90| 04 0d 1f a4 36 6c 6f 61 | 64 25 20 3d 20 28 21 66 |....6loa|d% = (!f|
|00004da0| 69 6c 65 5f 70 74 72 25 | 20 20 80 20 26 46 46 46 |ile_ptr%| . &FFF|
|00004db0| 46 29 3a 24 6c 6f 61 64 | 5f 70 74 72 25 20 3d 20 |F):$load|_ptr% = |
|00004dc0| c3 7e 6c 6f 61 64 25 0d | 1f ae 36 65 78 65 63 25 |.~load%.|..6exec%|
|00004dd0| 20 3d 20 28 66 69 6c 65 | 5f 70 74 72 25 21 34 20 | = (file|_ptr%!4 |
|00004de0| 80 20 26 46 46 46 46 29 | 3a 24 65 78 65 63 5f 70 |. &FFFF)|:$exec_p|
|00004df0| 74 72 25 20 3d 20 c3 7e | 65 78 65 63 25 0d 1f b8 |tr% = .~|exec%...|
|00004e00| 04 0d 1f c2 1d e7 20 67 | 75 65 73 73 5f 74 79 70 |...... g|uess_typ|
|00004e10| 65 25 20 f2 67 75 65 73 | 73 5f 74 79 70 65 0d 1f |e% .gues|s_type..|
|00004e20| cc 04 0d 1f d6 12 f2 67 | 65 74 5f 66 69 6c 65 5f |.......g|et_file_|
|00004e30| 74 79 70 65 0d 1f e0 04 | 0d 1f ea 28 6f 72 69 67 |type....|...(orig|
|00004e40| 69 6e 61 6c 5f 66 69 6c | 65 5f 6e 61 6d 65 24 20 |inal_fil|e_name$ |
|00004e50| 3d 20 24 28 66 69 6c 65 | 5f 70 74 72 25 2b 38 29 |= $(file|_ptr%+8)|
|00004e60| 0d 1f f4 04 0d 1f fe 2c | 24 73 61 76 65 5f 70 74 |.......,|$save_pt|
|00004e70| 72 25 20 3d 20 a4 66 69 | 6c 65 5f 76 61 6c 69 64 |r% = .fi|le_valid|
|00004e80| 28 24 28 66 69 6c 65 5f | 70 74 72 25 2b 38 29 29 |($(file_|ptr%+8))|
|00004e90| 0d 20 08 04 0d 20 12 1a | 67 65 74 74 69 6e 67 5f |. ... ..|getting_|
|00004ea0| 66 69 6c 65 5f 6e 61 6d | 65 25 20 3d 20 a3 0d 20 |file_nam|e% = .. |
|00004eb0| 1c 04 0d 20 26 44 e7 20 | ac 20 6f 6e 65 5f 73 68 |... &D. |. one_sh|
|00004ec0| 6f 74 25 20 f2 73 61 76 | 65 5f 66 69 6c 65 28 22 |ot% .sav|e_file("|
|00004ed0| 3c 42 42 43 54 61 70 65 | 24 44 69 72 3e 2e 42 42 |<BBCTape|$Dir>.BB|
|00004ee0| 43 46 69 6c 65 73 2e 22 | 2b 24 73 61 76 65 5f 70 |CFiles."|+$save_p|
|00004ef0| 74 72 25 2c b9 29 0d 20 | 30 04 0d 20 3a 11 e7 20 |tr%,.). |0.. :.. |
|00004f00| 6f 6e 65 5f 73 68 6f 74 | 25 20 8c 0d 20 44 12 20 |one_shot|% .. D. |
|00004f10| 20 f2 72 65 73 65 74 5f | 73 74 61 74 65 0d 20 4e | .reset_|state. N|
|00004f20| 05 cc 0d 20 58 16 20 20 | f2 73 74 61 72 74 5f 75 |... X. |.start_u|
|00004f30| 70 6c 6f 61 64 28 30 29 | 0d 20 62 05 cd 0d 20 6c |pload(0)|. b... l|
|00004f40| 04 0d 20 76 07 3d 20 30 | 0d 20 80 04 0d 20 8a 4c |.. v.= 0|. ... .L|
|00004f50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f90| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 20 94 04 0d 20 9e 11 |--------|. ... ..|
|00004fa0| dd 20 f2 67 75 65 73 73 | 5f 74 79 70 65 0d 20 a8 |. .guess|_type. .|
|00004fb0| 04 0d 20 b2 0a c8 8e 20 | b9 20 ca 0d 20 bc 28 20 |.. .... |. .. .( |
|00004fc0| 20 c9 20 6c 6f 61 64 25 | 3e 26 43 30 30 30 20 3a | . load%|>&C000 :|
|00004fd0| 24 74 79 70 65 5f 70 74 | 72 25 20 3d 20 22 54 65 |$type_pt|r% = "Te|
|00004fe0| 78 74 22 0d 20 c6 2b 20 | 20 c9 20 6c 6f 61 64 25 |xt". .+ | . load%|
|00004ff0| 3e 26 38 30 30 30 20 3a | 24 74 79 70 65 5f 70 74 |>&8000 :|$type_pt|
|00005000| 72 25 20 3d 20 22 42 42 | 43 20 52 4f 4d 22 0d 20 |r% = "BB|C ROM". |
|00005010| d0 28 20 20 c9 20 65 78 | 65 63 25 3e 26 43 30 30 |.( . ex|ec%>&C00|
|00005020| 30 20 3a 24 74 79 70 65 | 5f 70 74 72 25 20 3d 20 |0 :$type|_ptr% = |
|00005030| 22 44 61 74 61 22 0d 20 | da 29 20 20 c9 20 65 78 |"Data". |.) . ex|
|00005040| 65 63 25 3e 26 38 30 30 | 30 20 3a 24 74 79 70 65 |ec%>&800|0 :$type|
|00005050| 5f 70 74 72 25 20 3d 20 | 22 42 41 53 49 43 22 0d |_ptr% = |"BASIC".|
|00005060| 20 e4 23 20 20 7f 20 20 | 20 20 20 20 20 20 20 24 | .# . | $|
|00005070| 74 79 70 65 5f 70 74 72 | 25 20 3d 20 22 44 61 74 |type_ptr|% = "Dat|
|00005080| 61 22 0d 20 ee 05 cb 0d | 20 f8 04 0d 21 02 05 e1 |a". ....| ...!...|
|00005090| 0d 21 0c 04 0d 21 16 4c | 2d 2d 2d 2d 2d 2d 2d 2d |.!...!.L|--------|
|000050a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000050b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000050c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000050d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000050e0| 0d 21 20 04 0d 21 2a 18 | dd 20 a4 66 69 6c 65 5f |.! ..!*.|. .file_|
|000050f0| 76 61 6c 69 64 28 6e 61 | 6d 65 24 29 0d 21 34 04 |valid(na|me$).!4.|
|00005100| 0d 21 3e 15 e3 20 69 25 | 3d 31 20 b8 20 a9 28 6e |.!>.. i%|=1 . .(n|
|00005110| 61 6d 65 24 29 0d 21 48 | 32 20 20 e7 20 a4 62 61 |ame$).!H|2 . .ba|
|00005120| 64 5f 63 68 61 72 28 c1 | 6e 61 6d 65 24 2c 69 25 |d_char(.|name$,i%|
|00005130| 2c 31 29 29 20 c1 6e 61 | 6d 65 24 2c 69 25 2c 31 |,1)) .na|me$,i%,1|
|00005140| 29 20 3d 20 22 3f 22 0d | 21 52 05 ed 0d 21 5c 04 |) = "?".|!R...!\.|
|00005150| 0d 21 66 16 6e 61 6d 65 | 24 20 3d 20 c0 6e 61 6d |.!f.name|$ = .nam|
|00005160| 65 24 2c 31 30 29 0d 21 | 70 04 0d 21 7a 0b 3d 20 |e$,10).!|p..!z.= |
|00005170| 6e 61 6d 65 24 0d 21 84 | 04 0d 21 8e 4c 2d 2d 2d |name$.!.|..!.L---|
|00005180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000051a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000051b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000051c0| 2d 2d 2d 2d 2d 0d 21 98 | 04 0d 21 a2 16 dd 20 a4 |-----.!.|..!... .|
|000051d0| 62 61 64 5f 63 68 61 72 | 28 63 68 61 72 24 29 0d |bad_char|(char$).|
|000051e0| 21 ac 04 0d 21 b6 13 e7 | 20 63 68 61 72 24 3c 22 |!...!...| char$<"|
|000051f0| 21 22 20 3d 20 b9 0d 21 | c0 13 e7 20 63 68 61 72 |!" = ..!|... char|
|00005200| 24 3e 22 7e 22 20 3d 20 | b9 0d 21 ca 20 e7 20 63 |$>"~" = |..!. . c|
|00005210| 68 61 72 24 3e 22 22 22 | 22 20 80 20 63 68 61 72 |har$>"""|" . char|
|00005220| 24 3c 22 27 22 20 3d 20 | b9 0d 21 d4 13 e7 20 63 |$<"'" = |..!... c|
|00005230| 68 61 72 24 3d 22 2a 22 | 20 3d 20 b9 0d 21 de 13 |har$="*"| = ..!..|
|00005240| e7 20 63 68 61 72 24 3d | 22 2e 22 20 3d 20 b9 0d |. char$=|"." = ..|
|00005250| 21 e8 13 e7 20 63 68 61 | 72 24 3d 22 3a 22 20 3d |!... cha|r$=":" =|
|00005260| 20 b9 0d 21 f2 13 e7 20 | 63 68 61 72 24 3d 22 3c | ..!... |char$="<|
|00005270| 22 20 3d 20 b9 0d 21 fc | 13 e7 20 63 68 61 72 24 |" = ..!.|.. char$|
|00005280| 3d 22 3e 22 20 3d 20 b9 | 0d 22 06 13 e7 20 63 68 |=">" = .|."... ch|
|00005290| 61 72 24 3d 22 40 22 20 | 3d 20 b9 0d 22 10 13 e7 |ar$="@" |= .."...|
|000052a0| 20 63 68 61 72 24 3d 22 | 5e 22 20 3d 20 b9 0d 22 | char$="|^" = .."|
|000052b0| 1a 13 e7 20 63 68 61 72 | 24 3d 22 5c 22 20 3d 20 |... char|$="\" = |
|000052c0| b9 0d 22 24 14 20 20 20 | 20 20 20 20 20 20 20 20 |.."$. | |
|000052d0| 20 20 3d 20 a3 0d 22 2e | 04 0d 22 38 4c 2d 2d 2d | = ..".|.."8L---|
|000052e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000052f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005320| 2d 2d 2d 2d 2d 0d 22 42 | 04 0d 22 4c 12 dd 20 a4 |-----."B|.."L.. .|
|00005330| 62 69 74 73 28 62 79 74 | 65 25 29 0d 22 56 04 0d |bits(byt|e%)."V..|
|00005340| 22 60 0a ea 20 6e 75 6d | 25 0d 22 6a 04 0d 22 74 |"`.. num|%."j.."t|
|00005350| 0c 6e 75 6d 25 20 3d 20 | 30 0d 22 7e 10 e3 20 62 |.num% = |0."~.. b|
|00005360| 69 74 25 3d 30 20 b8 20 | 37 0d 22 88 23 20 20 e7 |it%=0 . |7.".# .|
|00005370| 20 62 79 74 65 25 20 80 | 20 28 31 3c 3c 62 69 74 | byte% .| (1<<bit|
|00005380| 25 29 20 6e 75 6d 25 20 | 2b 3d 20 31 0d 22 92 05 |%) num% |+= 1."..|
|00005390| ed 0d 22 9c 04 0d 22 a6 | 0a 3d 20 6e 75 6d 25 0d |.."...".|.= num%.|
|000053a0| 22 b0 04 0d 22 ba 4c 2a | 2a 2a 2a 2a 2a 2a 2a 2a |"...".L*|********|
|000053b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000053c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000053d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000053e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0d |********|*******.|
|000053f0| 22 c4 04 0d 22 ce 36 52 | 6f 75 74 69 6e 65 73 20 |"...".6R|outines |
|00005400| 74 6f 20 64 65 61 6c 20 | 77 69 74 68 20 65 76 65 |to deal |with eve|
|00005410| 6e 74 73 20 66 72 6f 6d | 20 74 68 65 20 70 6f 6c |nts from| the pol|
|00005420| 6c 69 6e 67 20 6c 6f 6f | 70 0d 22 d8 04 0d 22 e2 |ling loo|p."...".|
|00005430| 4c 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |L*******|********|
|00005440| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005450| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005460| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005470| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0d 22 ec 04 0d 22 f6 |********|*."...".|
|00005480| 12 dd 20 f2 6d 6f 75 73 | 65 5f 63 6c 69 63 6b 0d |.. .mous|e_click.|
|00005490| 23 00 04 0d 23 0a 1c ea | 20 78 25 2c 79 25 2c 62 |#...#...| x%,y%,b|
|000054a0| 25 2c 77 69 6e 64 6f 77 | 25 2c 69 63 6f 6e 25 0d |%,window|%,icon%.|
|000054b0| 23 14 04 0d 23 1e 45 78 | 25 20 20 20 20 20 20 3d |#...#.Ex|% =|
|000054c0| 20 21 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 20 20 3a | !wimp_b|lock% :|
|000054d0| 79 25 20 20 20 20 3d 20 | 77 69 6d 70 5f 62 6c 6f |y% = |wimp_blo|
|000054e0| 63 6b 25 21 34 3a 62 25 | 20 3d 20 77 69 6d 70 5f |ck%!4:b%| = wimp_|
|000054f0| 62 6c 6f 63 6b 25 21 38 | 0d 23 28 33 77 69 6e 64 |block%!8|.#(3wind|
|00005500| 6f 77 25 20 3d 20 77 69 | 6d 70 5f 62 6c 6f 63 6b |ow% = wi|mp_block|
|00005510| 25 21 31 32 3a 69 63 6f | 6e 25 20 3d 20 77 69 6d |%!12:ico|n% = wim|
|00005520| 70 5f 62 6c 6f 63 6b 25 | 21 31 36 0d 23 32 04 0d |p_block%|!16.#2..|
|00005530| 23 3c 0a c8 8e 20 b9 20 | ca 0d 23 46 45 20 20 c9 |#<... . |..#FE .|
|00005540| 20 62 25 3d 32 20 20 20 | 20 20 20 20 3a e7 20 77 | b%=2 | :. w|
|00005550| 69 6e 64 6f 77 25 3d 2d | 32 20 79 25 20 3d 20 39 |indow%=-|2 y% = 9|
|00005560| 36 20 2b 20 34 34 2a 6e | 75 6d 5f 6d 65 6e 75 5f |6 + 44*n|um_menu_|
|00005570| 69 74 65 6d 73 25 28 30 | 29 20 2b 20 32 34 0d 23 |items%(0|) + 24.#|
|00005580| 50 44 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |PD | |
|00005590| 20 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 43 72 | .. |"Wimp_Cr|
|000055a0| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 6d 65 6e 75 5f |eateMenu|",,menu_|
|000055b0| 62 6c 6f 63 6b 25 28 30 | 29 2c 78 25 2d 36 34 2c |block%(0|),x%-64,|
|000055c0| 79 25 0d 23 5a 3f 20 20 | c9 20 77 69 6e 64 6f 77 |y%.#Z? |. window|
|000055d0| 25 3d 2d 32 20 3a f2 75 | 70 64 61 74 65 5f 73 74 |%=-2 :.u|pdate_st|
|000055e0| 61 74 75 73 3a f2 6f 70 | 65 6e 5f 77 69 6e 64 6f |atus:.op|en_windo|
|000055f0| 77 28 73 74 61 74 75 73 | 5f 77 69 6e 64 6f 77 25 |w(status|_window%|
|00005600| 29 0d 23 64 17 20 20 c9 | 20 77 69 6e 64 6f 77 25 |).#d. .| window%|
|00005610| 3d 73 61 76 65 61 73 25 | 0d 23 6e 12 20 20 20 20 |=saveas%|.#n. |
|00005620| c8 8e 20 69 63 6f 6e 25 | 20 ca 0d 23 78 40 20 20 |.. icon%| ..#x@ |
|00005630| 20 20 20 20 c9 20 30 20 | 3a e7 20 62 25 3e 31 35 | . 0 |:. b%>15|
|00005640| 20 f2 73 74 61 72 74 5f | 64 72 61 67 28 77 69 6e | .start_|drag(win|
|00005650| 64 6f 77 25 2c 69 63 6f | 6e 25 2c 62 25 29 3a 73 |dow%,ico|n%,b%):s|
|00005660| 61 76 69 6e 67 25 20 3d | 20 b9 0d 23 82 27 20 20 |aving% =| ..#.' |
|00005670| 20 20 20 20 c9 20 32 20 | 3a f2 73 61 76 65 5f 66 | . 2 |:.save_f|
|00005680| 69 6c 65 28 24 73 61 76 | 65 5f 70 74 72 25 2c b9 |ile($sav|e_ptr%,.|
|00005690| 29 0d 23 8c 31 20 20 20 | 20 20 20 20 20 20 20 20 |).#.1 | |
|000056a0| 20 20 20 e7 20 62 25 3e | 31 20 c8 99 20 22 57 69 | . b%>|1 .. "Wi|
|000056b0| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|000056c0| 2d 31 0d 23 96 09 20 20 | 20 20 cb 0d 23 a0 05 cb |-1.#.. | ..#...|
|000056d0| 0d 23 aa 04 0d 23 b4 05 | e1 0d 23 be 04 0d 23 c8 |.#...#..|..#...#.|
|000056e0| 4c 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |L-------|--------|
|000056f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005700| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005710| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005720| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 23 d2 04 0d 23 dc |--------|-.#...#.|
|00005730| 28 dd 20 f2 73 74 61 72 | 74 5f 64 72 61 67 28 77 |(. .star|t_drag(w|
|00005740| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 2c 62 75 74 |indow%,i|con%,but|
|00005750| 74 6f 6e 25 29 0d 23 e6 | 04 0d 23 f0 0d ea 20 62 |ton%).#.|..#... b|
|00005760| 78 25 2c 62 79 25 0d 23 | fa 04 0d 24 04 1a 64 72 |x%,by%.#|...$..dr|
|00005770| 61 67 5f 62 75 74 74 6f | 6e 25 20 3d 20 62 75 74 |ag_butto|n% = but|
|00005780| 74 6f 6e 25 0d 24 0e 04 | 0d 24 18 1a 21 77 69 6d |ton%.$..|.$..!wim|
|00005790| 70 5f 62 6c 6f 63 6b 25 | 20 3d 20 77 69 6e 64 6f |p_block%| = windo|
|000057a0| 77 25 0d 24 22 29 c8 99 | 20 22 57 69 6d 70 5f 47 |w%.$")..| "Wimp_G|
|000057b0| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|000057c0| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 0d 24 2c 04 0d |wimp_blo|ck%.$,..|
|000057d0| 24 36 29 62 78 25 20 3d | 20 77 69 6d 70 5f 62 6c |$6)bx% =| wimp_bl|
|000057e0| 6f 63 6b 25 21 34 20 20 | 2d 20 77 69 6d 70 5f 62 |ock%!4 |- wimp_b|
|000057f0| 6c 6f 63 6b 25 21 32 30 | 0d 24 40 29 62 79 25 20 |lock%!20|.$@)by% |
|00005800| 3d 20 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 31 36 |= wimp_b|lock%!16|
|00005810| 20 2d 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 32 | - wimp_|block%!2|
|00005820| 34 0d 24 4a 19 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |4.$J.wim|p_block%|
|00005830| 21 34 20 3d 20 69 63 6f | 6e 25 0d 24 54 27 c8 99 |!4 = ico|n%.$T'..|
|00005840| 20 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 | "Wimp_G|etIconSt|
|00005850| 61 74 65 22 2c 2c 77 69 | 6d 70 5f 62 6c 6f 63 6b |ate",,wi|mp_block|
|00005860| 25 0d 24 5e 04 0d 24 68 | 17 77 69 6d 70 5f 62 6c |%.$^..$h|.wimp_bl|
|00005870| 6f 63 6b 25 21 34 20 20 | 20 3d 20 35 0d 24 72 19 |ock%!4 | = 5.$r.|
|00005880| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 38 20 20 2b |wimp_blo|ck%!8 +|
|00005890| 3d 20 62 78 25 0d 24 7c | 19 77 69 6d 70 5f 62 6c |= bx%.$||.wimp_bl|
|000058a0| 6f 63 6b 25 21 31 32 20 | 2b 3d 20 62 79 25 0d 24 |ock%!12 |+= by%.$|
|000058b0| 86 19 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 31 36 |..wimp_b|lock%!16|
|000058c0| 20 2b 3d 20 62 78 25 0d | 24 90 19 77 69 6d 70 5f | += bx%.|$..wimp_|
|000058d0| 62 6c 6f 63 6b 25 21 32 | 30 20 2b 3d 20 62 79 25 |block%!2|0 += by%|
|000058e0| 0d 24 9a 17 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |.$..wimp|_block%!|
|000058f0| 32 34 20 20 3d 20 30 0d | 24 a4 17 77 69 6d 70 5f |24 = 0.|$..wimp_|
|00005900| 62 6c 6f 63 6b 25 21 32 | 38 20 20 3d 20 30 0d 24 |block%!2|8 = 0.$|
|00005910| ae 1f 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 33 32 |..wimp_b|lock%!32|
|00005920| 20 20 3d 20 73 63 72 65 | 65 6e 5f 78 25 0d 24 b8 | = scre|en_x%.$.|
|00005930| 1f 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 33 36 20 |.wimp_bl|ock%!36 |
|00005940| 20 3d 20 73 63 72 65 65 | 6e 5f 79 25 0d 24 c2 22 | = scree|n_y%.$."|
|00005950| c8 99 20 22 57 69 6d 70 | 5f 44 72 61 67 42 6f 78 |.. "Wimp|_DragBox|
|00005960| 22 2c 2c 77 69 6d 70 5f | 62 6c 6f 63 6b 25 0d 24 |",,wimp_|block%.$|
|00005970| cc 04 0d 24 d6 05 e1 0d | 24 e0 04 0d 24 ea 4c 2d |...$....|$...$.L-|
|00005980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059c0| 2d 2d 2d 2d 2d 2d 2d 0d | 24 f4 04 0d 24 fe 14 dd |-------.|$...$...|
|000059d0| 20 f2 75 73 65 72 5f 64 | 72 61 67 5f 62 6f 78 0d | .user_d|rag_box.|
|000059e0| 25 08 04 0d 25 12 19 ea | 20 78 25 2c 79 25 2c 77 |%...%...| x%,y%,w|
|000059f0| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 0d 25 1c 04 |indow%,i|con%.%..|
|00005a00| 0d 25 26 11 e7 20 ac 20 | 73 61 76 69 6e 67 25 20 |.%&.. . |saving% |
|00005a10| e1 0d 25 30 04 0d 25 3a | 29 c8 99 20 22 57 69 6d |..%0..%:|).. "Wim|
|00005a20| 70 5f 47 65 74 50 6f 69 | 6e 74 65 72 49 6e 66 6f |p_GetPoi|nterInfo|
|00005a30| 22 2c 2c 77 69 6d 70 5f | 62 6c 6f 63 6b 25 0d 25 |",,wimp_|block%.%|
|00005a40| 44 36 78 25 20 20 20 20 | 20 20 20 3d 20 21 77 69 |D6x% | = !wi|
|00005a50| 6d 70 5f 62 6c 6f 63 6b | 25 20 20 3a 79 25 20 20 |mp_block|% :y% |
|00005a60| 20 20 20 20 20 3d 20 77 | 69 6d 70 5f 62 6c 6f 63 | = w|imp_bloc|
|00005a70| 6b 25 21 34 0d 25 4e 37 | 77 69 6e 64 6f 77 25 20 |k%!4.%N7|window% |
|00005a80| 20 3d 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 31 | = wimp_|block%!1|
|00005a90| 32 3a 69 63 6f 6e 25 20 | 20 20 20 3d 20 77 69 6d |2:icon% | = wim|
|00005aa0| 70 5f 62 6c 6f 63 6b 25 | 21 31 36 0d 25 58 04 0d |p_block%|!16.%X..|
|00005ab0| 25 62 15 73 61 76 69 6e | 67 25 20 20 20 20 20 20 |%b.savin|g% |
|00005ac0| 20 3d 20 a3 0d 25 6c 1f | 74 72 61 6e 73 6d 69 74 | = ..%l.|transmit|
|00005ad0| 5f 70 74 72 25 20 3d 20 | 66 69 6c 65 5f 62 6c 6f |_ptr% = |file_blo|
|00005ae0| 63 6b 25 0d 25 76 04 0d | 25 80 12 f2 67 65 74 5f |ck%.%v..|%...get_|
|00005af0| 66 69 6c 65 5f 74 79 70 | 65 0d 25 8a 04 0d 25 94 |file_typ|e.%...%.|
|00005b00| 1b 21 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 20 20 20 |.!wimp_b|lock% |
|00005b10| 20 20 20 3d 20 32 35 36 | 0d 25 9e 33 77 69 6d 70 | = 256|.%.3wimp|
|00005b20| 5f 62 6c 6f 63 6b 25 21 | 31 32 20 20 20 20 3d 20 |_block%!|12 = |
|00005b30| 30 20 20 20 20 20 20 20 | 3a 77 69 6d 70 5f 62 6c |0 |:wimp_bl|
|00005b40| 6f 63 6b 25 21 31 36 20 | 3d 20 31 0d 25 a8 37 77 |ock%!16 |= 1.%.7w|
|00005b50| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 32 30 20 20 20 |imp_bloc|k%!20 |
|00005b60| 20 3d 20 77 69 6e 64 6f | 77 25 20 3a 77 69 6d 70 | = windo|w% :wimp|
|00005b70| 5f 62 6c 6f 63 6b 25 21 | 32 34 20 3d 20 69 63 6f |_block%!|24 = ico|
|00005b80| 6e 25 0d 25 b2 34 77 69 | 6d 70 5f 62 6c 6f 63 6b |n%.%.4wi|mp_block|
|00005b90| 25 21 32 38 20 20 20 20 | 3d 20 78 25 20 20 20 20 |%!28 |= x% |
|00005ba0| 20 20 3a 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 33 | :wimp_|block%!3|
|00005bb0| 32 20 3d 20 79 25 0d 25 | bc 2f 77 69 6d 70 5f 62 |2 = y%.%|./wimp_b|
|00005bc0| 6c 6f 63 6b 25 21 33 36 | 20 20 20 20 3d 20 66 69 |lock%!36| = fi|
|00005bd0| 6c 65 5f 70 74 72 25 20 | 2d 20 66 69 6c 65 5f 62 |le_ptr% |- file_b|
|00005be0| 6c 6f 63 6b 25 0d 25 c6 | 22 77 69 6d 70 5f 62 6c |lock%.%.|"wimp_bl|
|00005bf0| 6f 63 6b 25 21 34 30 20 | 20 20 20 3d 20 66 69 6c |ock%!40 | = fil|
|00005c00| 65 5f 74 79 70 65 25 0d | 25 d0 33 24 28 77 69 6d |e_type%.|%.3$(wim|
|00005c10| 70 5f 62 6c 6f 63 6b 25 | 2b 34 34 29 20 3d 20 a4 |p_block%|+44) = .|
|00005c20| 6c 65 61 66 5f 6e 61 6d | 65 28 24 73 61 76 65 5f |leaf_nam|e($save_|
|00005c30| 70 74 72 25 29 20 2b 20 | bd 30 0d 25 da 36 c8 99 |ptr%) + |.0.%.6..|
|00005c40| 20 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 | "Wimp_S|endMessa|
|00005c50| 67 65 22 2c 31 37 2c 77 | 69 6d 70 5f 62 6c 6f 63 |ge",17,w|imp_bloc|
|00005c60| 6b 25 2c 77 69 6e 64 6f | 77 25 2c 69 63 6f 6e 25 |k%,windo|w%,icon%|
|00005c70| 0d 25 e4 04 0d 25 ee 05 | e1 0d 25 f8 04 0d 26 02 |.%...%..|..%...&.|
|00005c80| 4c 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |L-------|--------|
|00005c90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 26 0c 04 0d 26 16 |--------|-.&...&.|
|00005cd0| 17 dd 20 a4 6c 65 61 66 | 5f 6e 61 6d 65 28 70 61 |.. .leaf|_name(pa|
|00005ce0| 74 68 24 29 0d 26 20 04 | 0d 26 2a 0e ea 20 69 25 |th$).& .|.&*.. i%|
|00005cf0| 2c 63 68 61 72 24 0d 26 | 34 04 0d 26 3e 11 69 25 |,char$.&|4..&>.i%|
|00005d00| 20 3d 20 a9 28 70 61 74 | 68 24 29 0d 26 48 05 f5 | = .(pat|h$).&H..|
|00005d10| 0d 26 52 0d 20 20 69 25 | 20 2d 3d 20 31 0d 26 5c |.&R. i%| -= 1.&\|
|00005d20| 1a 20 20 63 68 61 72 24 | 20 3d 20 c1 70 61 74 68 |. char$| = .path|
|00005d30| 24 2c 69 25 2c 31 29 0d | 26 66 22 fd 20 63 68 61 |$,i%,1).|&f". cha|
|00005d40| 72 24 3d 22 2e 22 20 84 | 20 63 68 61 72 24 3d 22 |r$="." .| char$="|
|00005d50| 3a 22 20 84 20 69 25 3d | 31 0d 26 70 04 0d 26 7a |:" . i%=|1.&p..&z|
|00005d60| 2a e7 20 63 68 61 72 24 | 3d 22 2e 22 20 84 20 63 |*. char$|="." . c|
|00005d70| 68 61 72 24 3d 22 3a 22 | 20 3d 20 c1 70 61 74 68 |har$=":"| = .path|
|00005d80| 24 2c 69 25 2b 31 29 0d | 26 84 04 0d 26 8e 0b 3d |$,i%+1).|&...&..=|
|00005d90| 20 70 61 74 68 24 0d 26 | 98 04 0d 26 a2 4c 2d 2d | path$.&|...&.L--|
|00005da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005dd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005de0| 2d 2d 2d 2d 2d 2d 0d 26 | ac 04 0d 26 b6 15 dd 20 |------.&|...&... |
|00005df0| f2 6d 65 6e 75 5f 73 65 | 6c 65 63 74 69 6f 6e 0d |.menu_se|lection.|
|00005e00| 26 c0 04 0d 26 ca 1d ea | 20 69 74 65 6d 25 2c 73 |&...&...| item%,s|
|00005e10| 75 62 5f 69 74 65 6d 25 | 2c 62 75 74 74 6f 6e 25 |ub_item%|,button%|
|00005e20| 0d 26 d4 04 0d 26 de 3e | 69 74 65 6d 25 20 3d 20 |.&...&.>|item% = |
|00005e30| 21 77 69 6d 70 5f 62 6c | 6f 63 6b 25 3a 73 75 62 |!wimp_bl|ock%:sub|
|00005e40| 5f 69 74 65 6d 25 20 3d | 20 77 69 6d 70 5f 62 6c |_item% =| wimp_bl|
|00005e50| 6f 63 6b 25 21 34 3a e7 | 20 69 74 65 6d 25 3c 30 |ock%!4:.| item%<0|
|00005e60| 20 e1 0d 26 e8 04 0d 26 | f2 29 c8 99 20 22 57 69 | ..&...&|.).. "Wi|
|00005e70| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00005e80| 6f 22 2c 2c 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 0d |o",,wimp|_block%.|
|00005e90| 26 fc 1b 62 75 74 74 6f | 6e 25 20 3d 20 77 69 6d |&..butto|n% = wim|
|00005ea0| 70 5f 62 6c 6f 63 6b 25 | 21 38 0d 27 06 04 0d 27 |p_block%|!8.'...'|
|00005eb0| 10 17 c8 8e 20 6d 65 6e | 75 24 28 69 74 65 6d 25 |.... men|u$(item%|
|00005ec0| 2c 30 29 20 ca 0d 27 1a | 0e 20 20 c9 20 22 4d 69 |,0) ..'.|. . "Mi|
|00005ed0| 73 63 22 0d 27 24 18 20 | 20 20 20 e7 20 73 75 62 |sc".'$. | . sub|
|00005ee0| 5f 69 74 65 6d 25 3e 3d | 30 20 8c 0d 27 2e 21 20 |_item%>=|0 ..'.! |
|00005ef0| 20 20 20 20 20 c8 8e 20 | 6d 65 6e 75 24 28 73 75 | .. |menu$(su|
|00005f00| 62 5f 69 74 65 6d 25 2c | 31 29 20 ca 0d 27 38 2a |b_item%,|1) ..'8*|
|00005f10| 20 20 20 20 20 20 20 20 | c9 20 22 53 74 61 74 75 | |. "Statu|
|00005f20| 73 20 2e 2e 2e 22 20 3a | f2 75 70 64 61 74 65 5f |s ..." :|.update_|
|00005f30| 73 74 61 74 75 73 0d 27 | 42 3b 20 20 20 20 20 20 |status.'|B; |
|00005f40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005f50| 20 20 20 20 20 f2 6f 70 | 65 6e 5f 77 69 6e 64 6f | .op|en_windo|
|00005f60| 77 28 73 74 61 74 75 73 | 5f 77 69 6e 64 6f 77 25 |w(status|_window%|
|00005f70| 29 0d 27 4c 30 20 20 20 | 20 20 20 20 20 c9 20 22 |).'L0 | . "|
|00005f80| 39 36 30 30 2c 20 38 6e | 31 22 20 20 3a c8 99 20 |9600, 8n|1" :.. |
|00005f90| 22 4f 53 5f 53 65 72 69 | 61 6c 4f 70 22 2c 31 2c |"OS_Seri|alOp",1,|
|00005fa0| 30 0d 27 56 33 20 20 20 | 20 20 20 20 20 20 20 20 |0.'V3 | |
|00005fb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005fc0| c8 99 20 22 4f 53 5f 53 | 65 72 69 61 6c 4f 70 22 |.. "OS_S|erialOp"|
|00005fd0| 2c 35 2c 30 0d 27 60 33 | 20 20 20 20 20 20 20 20 |,5,0.'`3| |
|00005fe0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005ff0| 20 20 20 c8 99 20 22 4f | 53 5f 53 65 72 69 61 6c | .. "O|S_Serial|
|00006000| 4f 70 22 2c 36 2c 30 0d | 27 6a 28 20 20 20 20 20 |Op",6,0.|'j( |
|00006010| 20 20 20 c9 20 22 52 65 | 73 65 74 22 20 20 20 20 | . "Re|set" |
|00006020| 20 20 3a f2 72 65 73 65 | 74 5f 73 74 61 74 65 0d | :.rese|t_state.|
|00006030| 27 74 26 20 20 20 20 20 | 20 20 20 c9 20 22 43 6c |'t& | . "Cl|
|00006040| 65 61 72 22 20 20 20 20 | 20 20 3a f2 72 65 73 65 |ear" | :.rese|
|00006050| 74 5f 61 6c 6c 0d 27 7e | 0b 20 20 20 20 20 20 cb |t_all.'~|. .|
|00006060| 0d 27 88 09 20 20 20 20 | cd 0d 27 92 37 20 20 c9 |.'.. |..'.7 .|
|00006070| 20 22 53 61 76 65 22 20 | 3a f2 67 65 74 5f 66 69 | "Save" |:.get_fi|
|00006080| 6c 65 5f 74 79 70 65 3a | f2 73 61 76 65 5f 66 69 |le_type:|.save_fi|
|00006090| 6c 65 28 24 73 61 76 65 | 5f 70 74 72 25 2c b9 29 |le($save|_ptr%,.)|
|000060a0| 0d 27 9c 11 20 20 c9 20 | 22 4f 70 74 69 6f 6e 73 |.'.. . |"Options|
|000060b0| 22 0d 27 a6 18 20 20 20 | 20 e7 20 73 75 62 5f 69 |".'.. | . sub_i|
|000060c0| 74 65 6d 25 3e 3d 30 20 | 8c 0d 27 b0 21 20 20 20 |tem%>=0 |..'.! |
|000060d0| 20 20 20 c8 8e 20 6d 65 | 6e 75 24 28 73 75 62 5f | .. me|nu$(sub_|
|000060e0| 69 74 65 6d 25 2c 32 29 | 20 ca 0d 27 ba 19 20 20 |item%,2)| ..'.. |
|000060f0| 20 20 20 20 20 20 c9 20 | 22 46 69 6c 65 20 74 79 | . |"File ty|
|00006100| 70 65 22 0d 27 c4 1c 20 | 20 20 20 20 20 20 20 20 |pe".'.. | |
|00006110| 20 e7 20 6c 6f 61 64 5f | 65 78 65 63 25 20 8c 0d | . load_|exec% ..|
|00006120| 27 ce 1e 20 20 20 20 20 | 20 20 20 20 20 20 20 6c |'.. | l|
|00006130| 6f 61 64 5f 65 78 65 63 | 25 20 3d 20 a3 0d 27 d8 |oad_exec|% = ..'.|
|00006140| 2b 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 6d 65 |+ | .me|
|00006150| 6e 75 5f 74 69 63 6b 28 | 32 2c 22 46 69 6c 65 20 |nu_tick(|2,"File |
|00006160| 74 79 70 65 22 2c 31 29 | 0d 27 e2 2e 20 20 20 20 |type",1)|.'.. |
|00006170| 20 20 20 20 20 20 20 20 | f2 6d 65 6e 75 5f 74 69 | |.menu_ti|
|00006180| 63 6b 28 32 2c 22 4c 6f | 61 64 20 61 64 64 72 65 |ck(2,"Lo|ad addre|
|00006190| 73 73 22 2c 30 29 0d 27 | ec 2e 20 20 20 20 20 20 |ss",0).'|.. |
|000061a0| 20 20 20 20 20 20 f2 6d | 65 6e 75 5f 74 69 63 6b | .m|enu_tick|
|000061b0| 28 32 2c 22 45 78 65 63 | 20 61 64 64 72 65 73 73 |(2,"Exec| address|
|000061c0| 22 2c 30 29 0d 27 f6 0f | 20 20 20 20 20 20 20 20 |",0).'..| |
|000061d0| 20 20 cd 0d 28 00 2b 20 | 20 20 20 20 20 20 20 c9 | ..(.+ | .|
|000061e0| 20 22 4c 6f 61 64 20 61 | 64 64 72 65 73 73 22 2c | "Load a|ddress",|
|000061f0| 22 45 78 65 63 20 61 64 | 64 72 65 73 73 22 0d 28 |"Exec ad|dress".(|
|00006200| 0a 1e 20 20 20 20 20 20 | 20 20 20 20 e7 20 ac 20 |.. | . . |
|00006210| 6c 6f 61 64 5f 65 78 65 | 63 25 20 8c 0d 28 14 1e |load_exe|c% ..(..|
|00006220| 20 20 20 20 20 20 20 20 | 20 20 20 20 6c 6f 61 64 | | load|
|00006230| 5f 65 78 65 63 25 20 3d | 20 b9 0d 28 1e 2b 20 20 |_exec% =| ..(.+ |
|00006240| 20 20 20 20 20 20 20 20 | 20 20 f2 6d 65 6e 75 5f | | .menu_|
|00006250| 74 69 63 6b 28 32 2c 22 | 46 69 6c 65 20 74 79 70 |tick(2,"|File typ|
|00006260| 65 22 2c 30 29 0d 28 28 | 2e 20 20 20 20 20 20 20 |e",0).((|. |
|00006270| 20 20 20 20 20 f2 6d 65 | 6e 75 5f 74 69 63 6b 28 | .me|nu_tick(|
|00006280| 32 2c 22 4c 6f 61 64 20 | 61 64 64 72 65 73 73 22 |2,"Load |address"|
|00006290| 2c 31 29 0d 28 32 2e 20 | 20 20 20 20 20 20 20 20 |,1).(2. | |
|000062a0| 20 20 20 f2 6d 65 6e 75 | 5f 74 69 63 6b 28 32 2c | .menu|_tick(2,|
|000062b0| 22 45 78 65 63 20 61 64 | 64 72 65 73 73 22 2c 31 |"Exec ad|dress",1|
|000062c0| 29 0d 28 3c 0f 20 20 20 | 20 20 20 20 20 20 20 cd |).(<. | .|
|000062d0| 0d 28 46 33 20 20 20 20 | 20 20 20 20 c9 20 22 43 |.(F3 | . "C|
|000062e0| 52 20 89 20 4c 46 22 20 | 20 20 20 3a 64 6f 5f 63 |R . LF" | :do_c|
|000062f0| 72 6c 66 25 20 3d 20 64 | 6f 5f 63 72 6c 66 25 20 |rlf% = d|o_crlf% |
|00006300| 82 20 b9 0d 28 50 3d 20 | 20 20 20 20 20 20 20 20 |. ..(P= | |
|00006310| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006320| 20 20 f2 6d 65 6e 75 5f | 74 69 63 6b 5f 74 6f 67 | .menu_|tick_tog|
|00006330| 67 6c 65 28 32 2c 22 43 | 52 20 89 20 4c 46 22 29 |gle(2,"C|R . LF")|
|00006340| 0d 28 5a 42 20 20 20 20 | 20 20 20 20 20 20 20 20 |.(ZB | |
|00006350| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 e7 | | .|
|00006360| 20 6d 6f 64 69 66 69 65 | 64 25 20 84 20 ac 20 75 | modifie|d% . . u|
|00006370| 70 6c 6f 61 64 69 6e 67 | 25 20 f2 64 6f 5f 63 72 |ploading|% .do_cr|
|00006380| 6c 66 0d 28 64 39 20 20 | 20 20 20 20 20 20 c9 20 |lf.(d9 | . |
|00006390| 22 47 75 65 73 73 20 74 | 79 70 65 22 20 3a 67 75 |"Guess t|ype" :gu|
|000063a0| 65 73 73 5f 74 79 70 65 | 25 20 3d 20 67 75 65 73 |ess_type|% = gues|
|000063b0| 73 5f 74 79 70 65 25 20 | 82 20 b9 0d 28 6e 40 20 |s_type% |. ..(n@ |
|000063c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000063d0| 20 20 20 20 20 20 20 20 | 20 20 f2 6d 65 6e 75 5f | | .menu_|
|000063e0| 74 69 63 6b 5f 74 6f 67 | 67 6c 65 28 32 2c 22 47 |tick_tog|gle(2,"G|
|000063f0| 75 65 73 73 20 74 79 70 | 65 22 29 0d 28 78 38 20 |uess typ|e").(x8 |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
